head 1.1; branch 1.1.1; access ; symbols ePerl_2_2_14:1.1.1.1 RSE:1.1.1; locks ; strict; comment @# @; 1.1 date 99.05.02.14.43.39; author rse; state Exp; branches 1.1.1.1; next ; 1.1.1.1 date 99.05.02.14.43.39; author rse; state Exp; branches ; next ; desc @@ 1.1 log @Initial revision @ text @
@ 1.1.1.1 log @Import of ePerl 2.2.14 @ text @@demo.env
Standard CGI Example: Environment
This prints out the CGI environment provided by the Webserver as a sorted list consisting of key/value pairs.
my $key; foreach $key (sort(keys(%ENV))) { print "$key=$ENV{$key}\n"; } !>