home *** CD-ROM | disk | FTP | other *** search
/ PC World 2003 March / PCWorld_2003-03_cd.bin / Software / Topware / activeperl / ActivePerl / Perl / eg / cgi / env.pl
Encoding:
Perl Script  |  2001-07-30  |  287 b   |  18 lines
  1. #!/usr/local/ActivePerl-5.6/bin/perl -w
  2. #
  3. # env.pl
  4. #
  5. # This script dumps the environment variables in HTML format
  6.  
  7. use strict;
  8. use warnings;
  9. $|=1;
  10.  
  11. print "Content-type:text/html\n\n";
  12.  
  13. foreach my $var (sort keys %ENV) {
  14.     print $var . "=" . $ENV{$var} . "<br>\n";
  15. }
  16.  
  17.  
  18.