POD :: PARSER. POD :: PARSER ist eine Basis-Perl-Klasse zum Erstellen von Pod-Filtern und Übersetzern.
Jetzt downloaden

POD :: PARSER. Ranking & Zusammenfassung

POD :: PARSER. Stichworte

Perl-Modul Filter Pod Pod-Filter POD-Übersetzer Übersetzer

POD :: PARSER. Beschreibung

POD :: PARSER ist eine Basis-Perl-Klasse zum Erstellen von Pod-Filtern und Übersetzern. POD :: PARSER ist eine Basis-Perl-Klasse zum Erstellen von Pod-Filtern und Übersetzern.Synopsis Verwenden Sie POD :: Parser; Paket MyParser; @Isa = QW (Pod :: Parser); Unterbefehl {MY ($ PARSER, $ Command, $ Absatz, $ line_num) = @_; ## Interpretieren Sie den Befehl und seinen Text; Beispielaktionen sind möglicherweise: if ($ Command EQ 'head1') {...} ELSIF ($ Command EQ 'head2') {...} ## ... Andere Befehle und ihre Aktionen My $ out_fh = $ PARSER- > output_handle (); meine $ expansion = $ parser-> interpolat (absatz $, $ line_num); Drucken $ out_fh $ Expansion; } Sub-Verbatim {MY ($ Parser, $ Absatz, $ line_num) = @_; ## Format-Verbatim-Absatz; Beispielaktionen sind möglicherweise: My $ out_fh = $ Parser-> output_handle (); drucken $ out_fh $ Absatz; } Sub Textblock {mein ($ Parser, $ Absatz, $ line_num) = @_; ## Übersetzen / formatieren Sie diesen Textblock; Beispielaktionen sind möglicherweise: My $ out_fh = $ Parser-> output_handle (); meine $ expansion = $ parser-> interpolat (absatz $, $ line_num); Drucken $ out_fh $ Expansion; } Sub Interior_Equence {My ($ Parser, $ SEQ_COMMAND, $ SEQ_ARGUT) = @_; ## eine Innensequenz erweitern; Beispielaktionen sind möglicherweise: Return "* $ SEQ_ARGUT *", wenn ($ SEQ_COMMAND EQ 'B'); zurückgeben "` $ seq_argumentument '", wenn ($ SEQ_COMMAND EQ' C '); zurückgeben "_ $ {seq_argument} _ '", wenn ($ seq_command EQ' I '); ## ... Andere Sequenzbefehle und deren resultierende Text} Package Main; ## Erstellen Sie ein Parser-Objekt und lassen Sie die Datei analysieren, deren Name auf der Befehlszeile angegeben war (Verwenden Sie STDIN, wenn keine Dateien angegeben wurden). $ PARSER = NEUE MYPARSER (); $ Parser-> Parse_From_FileHandle (* stdin) if (@argv == 0); für (@argv) {$ Parser-> parse_from_file ($ _); } Anforderungen: · Perl.

POD :: PARSER. Zugehörige Software