MPE :: Datei.

MPE :: Datei ist eine Perl-Erweiterung für den Zugriff auf das Intrinsic von MPE-Datei.
Jetzt downloaden

MPE :: Datei. Ranking & Zusammenfassung

Anzeige

  • Rating:
  • Lizenz:
  • Perl Artistic License
  • Preis:
  • FREE
  • Name des Herausgebers:
  • Ken Hirsch
  • Website des Verlags:
  • http://search.cpan.org/~kahirsch/MPE-File-0.06/File.pm

MPE :: Datei. Stichworte


MPE :: Datei. Beschreibung

MPE :: Datei ist eine Perl-Erweiterung für den Zugriff auf die Intrinsik von MPE-Datei. MPE :: Datei ist eine Perl-Erweiterung für den Zugriff auf die MPE-Datei intrinsics.Synopsis Verwenden Sie MPE :: Datei; $ Datei = MPE :: datei-> neu (fred.pub, alt; acc = in ") oder sterben Sie nicht, dass Fred.pub nicht geöffnet werden kann: $ MPE_ERRRRRE"; Oder $ file = MPE :: file-> hpfopen (2, "fred.pub", 3, 1, 11, 0) oder sterben "Fred.pub nicht öffnen: $ MPE_ERRRRE"; Oder $ file = MPE :: file-> fopen ("fred.pub", 1, 0) oder sterben "fred.pub kann nicht geöffnet werden: $ mpe_rorn"; $ rec = $ file-> readrec (); # Verwenden Sie dies anstelle von Fread $ REC = $ file-> freadbykey ($ KEY, $ KEYLOC); $ rec = $ file-> freadlabel (); $ rec = $ file-> feaddir ($ lrecnum); $ rec = $ file-> feadc (); $ file-> geile ($ puffer, $ bufsize); $ file-> writerec ($ Puffer, ) # Verwenden Sie dieses anstelle von fwrite # (nicht einschließen "N 'am Ende von REC) $ Datei-> Druck ($ A, $ B, $ c); $ Datei-> Printf ($ FMT, $ A, $ B, $ c); # (nicht auf "N" am Ende von REC) $ Datei-> FUPDATE ($ Puffer); $ file-> fwritedir ($ -Puffer, $ lrecnum); $ Datei-> FWRITELABEL ($ Puffer, ) $ file-> fwrite ($ Puffer, $ Länge, $ ControlCode) $ Datei-> foß ($ lrecnum); $ Datei-> FCONTROL ($ itemnum, $ item); $ Datei-> FDELETE (); $ Datei-> FSSETMODE ($ MODEFLAGS); $ file-> fremove (); $ file-> fgetKeyinfo ($ param, $ control); $ Datei-> ffindbykey ($ value, $ lade, $ länge, $ relop); $ Datei-> druckfileeinfo (); $ rec = $ file-> iowait (); oder $ rec = iowait (0); Dann rufen Sie lastwaitfilenum () an, um die Dateinummer $ rec-> mpe_fileeno zu erhalten Anrufe MPE Intrinsic Print () (Perl-Druck funktioniert nicht richtig, wenn stdout Circular-Datei, MSG-Datei, ...) printop ($ msg) ist; $ rec = printopreply ($ msg); @info = $ file-> ffileinfo (1, 3, 7, 9); @Info = Faulinfo ("Fred.pub", $ Mode, 1, 3, 7, 9); Wenn ein Fehler auftritt, wird eine leere Liste zurückgegeben und Sie können $ MPE_ERROR und @mpe :: Datei :: ItemError für den Fehler $ errmsg = Ferrmsg ($ FSERRCODE) überprüfen; HPERRMSG ($ Displaycode, ...) Anforderungen: · Perl.


MPE :: Datei. Zugehörige Software