PERLCODE - Ausführung von Perl-Programmcode

Syntax:

#PERLCODE{begin}
perlscript
#PERLCODE{end}

Beschreibung:

#PERLCODE ist eine Master-Umgebung oder, besser formuliert, eine Schnittstelle, die es ermöglicht, ein kleines ¹ Programm direkt bei der Konvertierung auszuführen. Man kann es für verschiedene Zwecke gebrauchen:

• dynamisch Index-Dateien erstellen,
• Quell-Dateien in das Output-Verzeichnis kopieren,
• make-Mechanismen für die Teil-Dokumente aufrufen.

Besonders interessant ist die #PERLCODE-Umgebung in Verbindung mit Master-Makros (s. Seite und ). Dann kann man dem Perl-Programm auch die Argumente übergeben.
Das Perlprogramm perlskript darf kein `-Zeichen enthalten. Als Kommentar-Zeichen im Programm wird Lattenzaun (#) benutzt.

Beispiel:

   % Zu Beginn die Datei vrml.lst loeschen
   #PERLCODE{begin}             % Perl-begin
       unlink(vrml.lst)         # l"osche vrml.lst
           if (-f "vrml.lst");  # falls vorhanden
   #PERLCODE{end}               % Perl-end
   % Neues Makro definieren, dass bei Einbettung der VRML-Quellen
   % die Namen der Quellen in der Datei vrlm.lst mitprotokolliert.
   #NEWMACRO{SETVRML=3}            % Makro mit 3 Argumenten
      #VRML{                       % Vrml-Datei einbinden
          file=#1,                 % Dateiname
          alt=#2,                  % alternatives Bild
          width=#3                 % Bild-Breite
      }
      #PERLCODE{begin}             % Perl-begin
          open(DP,">>vrml.lst");   # vrml.lst zum Schreiben "offnen 
          print DP "#1\n";         # Dateinamen eintragen
          close(DP);               # vrml.lst schliessen 
      #PERLCODE{end}               % Perl-end
   #NEWMACRO{end}

Optionen:

keine