MPE::File - Perl access to following MPE file intrinsics $file = MPE::File->hpfopen(2, "FRED.PUB", 3, 1, 11, 0) $file = MPE::File->fopen("FRED.PUB", 1, 0) $rec = $file->readrec(); # use this instead of fread
$rec = $file->freadbykey($key, $keyloc);
$rec = $file->freadlabel( [$labelid] );
$rec = $file->freaddir($lrecnum);
$rec = $file->freadc();
$file->fread($buffer, $bufsize);
$file->writerec($buffer, [$controlcode] ) # use this instead of fwrite
$file->fupdate($buffer);
$file->fwritedir($buffer, $lrecnum);
$file->fwritelabel ($buffer, [$labelid] )
$file->fwrite($buffer, $length, $controlcode)
$file->fpoint($lrecnum);
$file->fcontrol($itemnum, $item);
$file->fdelete( [$lrecnum] );
$file->fsetmode($modeflags);
$file->fremove();
$file->fgetkeyinfo($param, $control);
$file->ffindbykey($value, $location, $length, $relop);
$file->printfileinfo();
@info = $file->ffileinfo(1, 3, 7, 9);
@info = flabelinfo("FRED.PUB", $mode, 1, 3, 7, 9);
$errmsg = ferrmsg($fserrcode);
hperrmsg($displaycode,...)