#!/usr/bin/perl print "Cache-Control: no-cache\n"; print "Content-type: text/html \n\n"; # print HTML file top print < Environment Variables

Environment Variables

END # Loop over the environment variables and print each variable and its value foreach $variable (sort keys %ENV) { print "$variable: $ENV{$variable}
\n"; } # Print the HTML file bottom print "";