Db::DFC 0.4

Db::DFC is the Perls Object-oriented interface to Documentums DFC.

SYNOPSIS

use Db::DFC;
$dfc = Db::DFC->new();

$DOCBASE = "docbase";
$USER = "user";
$PASSWORD = "passwd";
$DOMAIN = "domain";
$FILE = $0;

$dfclient = DfClient->new();
$idfclient = $dfclient->getLocalClient();
$idflogininfo = DfLoginInfo->new();

$idflogininfo->setUser($USER);
$idflogininfo->setPassword($PASSWORD);
$idflogininfo->setDomain($DOMAIN);

$idfsession = $idfclient->newSession($DOCBASE,$idflogininfo);

$pobj = $idfsession->newObject("dm_document");
$doc = $dfc->castToIDfDocument($pobj);

$doc->setObjectName("this file");
$doc->setContentType("crtext");
$doc->setFile($FILE);
$doc->save();

print "nDocument Id:" . $doc->getObjectId()->toString() . " created.n";
$idfsession->disconnect;