Perlpoint :: Vorlage :: TT2

Perlpoint :: Vorlage :: TT2 ist eine Beta eines Perlpoint-Vorlagenprozessors für Template Toolkit 2-Layouts.
Jetzt downloaden

Perlpoint :: Vorlage :: TT2 Ranking & Zusammenfassung

Anzeige

  • Rating:
  • Lizenz:
  • Perl Artistic License
  • Preis:
  • FREE
  • Name des Herausgebers:
  • Jochen Stenzel
  • Website des Verlags:
  • http://search.cpan.org/~jstenzel/Getopt-ArgvFile-1.11/ArgvFile.pm

Perlpoint :: Vorlage :: TT2 Stichworte


Perlpoint :: Vorlage :: TT2 Beschreibung

Perlpoint :: Vorlage :: TT2 ist eine Beta eines Perlpoint-Vorlagenprozessors für Template Toolkit 2-Layouts. Perlpoint :: Vorlage :: TT2 ist eine Beta eines Perlpoint-Vorlagenprozessors für Template Toolkit 2 Layouts.MethodsNew () Parameter: CLASSTHE Klasse Namens.Ralurns: Das neue Objekt.Example: # Startseite $ Ergebnis. = "NNNN"; # Start Header $ Ergebnis. = "nnnn"; # Header Inhalt: Dies wurde in die traditionelle Liste der Vorlagendateien $ Ergebnis hinzugefügt. = $ me -> _-ProzessTemplate (Join ('/', $ TDIR, $ Optionen -> {$ toc? 'header_toc_template': 'header_template'}) , $ TOC? 1: $ params {Seite}); # Complete Header $ Ergebnis. = "NNNNN"; # Beginn des Körpers $ Ergebnis. = "nnnn"; # Now The Body Inhalt: Beginnen Sie mit dem ersten Teil von Teilen $ 1: $ params {Seite}); # Navigation hinzufügen, falls erforderlich $ Ergebnis. = $ ME -> _ ProzessTemplate (Join ('/', $ TDIR, $ Optionen -> {$ TOC? 'Nav_toc_Template': 'nav_template'}), $ TOC? 1: $ params {Seite}) Wenn $ $ Optionen vorhanden ist -> {$ toc? 'nav_toc_template': 'nav_template'}; # Daten enthalten (für TOCS, vergewissern Sie sich, dass Sie keinen Standard-TOC fügen, wenn das Baum-Applet verwendet wird. - Dies sollte generell generisch sein, wenn Benutzer andere Methoden verwenden ...) $ result = ~ / _toc (): $ params {data}; # Bottom Navigation hinzufügen, falls erforderlich $ Ergebnis. = $ ME -> _ ProzessTemplate (Join ('/', $ TDIR, $ Optionen -> {$ TOC? 'nav_toc_template': 'nav_template'}), $ TOC? 1: $ Parameter {Seite}) Wenn vorhanden $ Optionen -> {$ toc? 'nav_toc_template': 'nav_template'}; # Fügen Sie endlich den unteren Teil dieses Ergebnisses hinzu Parameter {Seite}); # Schließen Sie den Körper $ Ergebnis. = "nnnn"; # und vervollständige die Seite $ $ Ergebnis. = "nnnn"; # Dateiname erstellen My $ DataName = Join ('', "$ Optionen -> {TargetDir} / $ Optionen -> {Prefix} -", (fileparse ($ TEMPLATE, QR (. +))) , "- $ params {Page} $ Optionen -> {Suffix}"); Warn "= Seite Ergänzung =====> $ filenamen"; # Schreibensdatei öffnen (Suppfile, "> $ Dateiname") oder die QQ ( konnte keine Ausgabedatei öffnen "$ Dateiname": $ !. n); Print SuppFile $ Saite; schließen (Suppfile); }} Anforderungen: · Perl Anforderungen: · Perl.


Perlpoint :: Vorlage :: TT2 Zugehörige Software