1.1 --- a/vstup/skriptování-proměnné.pl Sun Jul 08 12:55:27 2012 +0200
1.2 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000
1.3 @@ -1,17 +0,0 @@
1.4 -#!/usr/bin/perl
1.5 -
1.6 -# Projde zdroják v javě a najde v něm,
1.7 -# jaké proměnné prostředí se nastavují pro běh skriptů
1.8 -# Výstup: tělo XHTML tabulky (řádky)
1.9 -
1.10 -use strict;
1.11 -use warnings;
1.12 -
1.13 -open(JAVA, "<", $ENV{"XWG_SKRIPTOVANI_JAVA"}) or die $!;
1.14 -
1.15 -while (<JAVA>) {
1.16 - if (/"(.*)=".*\/\/\s+env:(.*)/) {
1.17 - print "<tr><td><code>$1</code></td><td>$2</td></tr>\n";
1.18 - }
1.19 -}
1.20 -