MPE :: Arquivo

MPE :: O arquivo é uma extensão Perl para acessar os intrínsecos do arquivo MPE.
Baixe Agora

MPE :: Arquivo Classificação e resumo

Propaganda

  • Rating:
  • Licença:
  • Perl Artistic License
  • Preço:
  • FREE
  • Nome do editor:
  • Ken Hirsch
  • Site do editor:
  • http://search.cpan.org/~kahirsch/MPE-File-0.06/File.pm

MPE :: Arquivo Tag


MPE :: Arquivo Descrição

MPE :: Arquivo é uma extensão Perl para acessar intrínsecos do arquivo MPE. MPE :: Arquivo é uma extensão Perl para acessar o arquivo MPE Intrinsics.synopsis Use MPE :: Arquivo; $ file = MPE :: file-> new ("fred.pub, antigo; acc = in") ou morrer "não pode abrir fred.pub: $ MPE_Erorn"; Ou $ FILE = MPE :: file-> hpfopen (2, "fred.pub", 3, 1, 11, 0) ou morrer "não pode abrir fred.pub: $ MPE_Erorn"; Ou $ file = mpe :: file-> fopen ("fred.pub", 1, 0) ou morrer "não pode abrir fred.pub: $ MPE_Erorn"; $ rec = $ file-> readrec (); # Use isso em vez de Fread $ REC = $ FILE-> FREADBYKEY (US $ KEYLOC); $ rec = $ file-> FREADLABEL (); $ rec = $ file-> Freaddir ($ lrecnum); $ rec = $ file-> FREADC (); $ file-> fread ($ buffer, $ bufsize); $ file-> Writerec ($ buffer, ) # use isso em vez de FWrite # (não inclua 'n' no final do rec) $ file-> imprimir ($ A, $ B, $ c); $ file-> printf ($ FMT, $ A, $ B, $ c); # (não inclua 'n' no final do rec) $ file-> fupdate ($ buffer); $ FILE-> FWRITDIR ($ buffer, $ lrecnum); $ file-> fwritelabel ($ buffer, ) $ file-> fwrite ($ buffer, $ Comprimento, $ ControlCode) $ file-> fpoint ($ lrecnum); $ File-> FControl ($ Itemnum, $ Item); $ file-> fdelete (); $ file-> fackmode ($ modeflags); $ file-> fremove (); $ file-> fgetkeyinfo ($ param, $ Control); $ file-> ffindbykey ($ valor, $ location, $ comprimento, $LOP); $ File-> PrintFileInfo (); $ rec = $ file-> iowait (); ou $ rec = Iowait (0); Em seguida, ligue para LastwaitFilenum () para obter o número do arquivo $ rec-> MPE_FILENO Você precisará disso para comparar com LastwaitFilenum () MPEPrint ("REC"); Chamadas MPE Intrinsic Imprimir () (a impressão Perl não funciona corretamente se o STDOUT for Arquivo Circular, arquivo MSG, ...) Impressão ($ msg); $ rec = prisãoproply ($ msg); @info = $ file-> ffileinfo (1, 3, 7, 9); @info = flabelinfo ("fred.pub", $ mode, 1, 3, 7, 9); Se houver um erro, uma lista vazia é retornada e você pode verificar $ MPE_Error e @MPE :: Arquivo :: itemError para o erro $ errmsg = fermsg ($ fserrcode); Hperrmsg ($ displaycode, ...) Requisitos: · Perl.


MPE :: Arquivo Software Relacionado