vstup/skriptování-proměnné.pl
author František Kučera <franta-hg@frantovo.cz>
Thu, 05 Jul 2012 14:27:01 +0200
changeset 106 ae484a54d7fb
parent 104 9224b3d36c61
permissions -rwxr-xr-x
#20 Skriptování: Podpora spouštění skriptů ze šablon (ne jen z dokumentů), oprava chyby (URI stránky bylo null), ale při přiřazování výstupu skriptu do proměnné nejde použít disable-output-escaping="yes" resp. vloží se escapovaný výstup (jiná makra lze přes proměnné procpat a používat je tak v jiných makrech). viz http://www.stylusstudio.com/xsllist/200105/post40940.html

#!/usr/bin/perl

# Projde zdroják v javě a najde v něm,
# jaké proměnné prostředí se nastavují pro běh skriptů
# Výstup: tělo XHTML tabulky (řádky)

use strict;
use warnings;

open(JAVA, "<", $ENV{"XWG_SKRIPTOVANI_JAVA"}) or die $!;

while (<JAVA>) {
	if (/"(.*)=".*\/\/\s+env:(.*)/) {
		print "<tr><td><code>$1</code></td><td>$2</td></tr>\n";
	}
}