changeset 104 | 9224b3d36c61 |
parent 103 | aa91d1c6d4c1 |
103:aa91d1c6d4c1 | 104:9224b3d36c61 |
---|---|
1 #!/usr/bin/perl |
1 #!/usr/bin/perl |
2 |
2 |
3 # Projde zdroják v javě a najde v něm, |
3 # Projde zdroják v javě a najde v něm, |
4 # jaké proměnné prostředí se nastavují pro běh skriptů |
4 # jaké proměnné prostředí se nastavují pro běh skriptů |
5 # Výstup: tělo XHTML tabulky (řádky) |
|
5 |
6 |
6 use strict; |
7 use strict; |
7 use warnings; |
8 use warnings; |
8 |
9 |
9 open(JAVA, "<", $ENV{"XWG_SKRIPTOVANI_JAVA"}) or die $!; |
10 open(JAVA, "<", $ENV{"XWG_SKRIPTOVANI_JAVA"}) or die $!; |