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,...)
