in reply to file back to the user
#!/usr/bin/perl ## ## printenv -- demo CGI program which just prints its environment ## print "Content-type: text/plain\n\n"; foreach $var (sort(keys(%ENV))) { $val = $ENV{$var}; $val =~ s|\n|\\n|g; $val =~ s|"|\\"|g; print "${var}=\"${val}\"\n"; }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: file back to the user
by stavros (Novice) on Oct 21, 2011 at 22:09 UTC | |
by aaron_baugher (Curate) on Oct 21, 2011 at 22:59 UTC | |
by Plankton (Vicar) on Oct 21, 2011 at 22:13 UTC |