#!/usr/bin/perl -Tuse strict;use CGI qw/:standard/;print header, start_html('Environment Variables');foreach my $variable (keys %ENV) { print p("$variable is $ENV{$variable}");}print end_html;exit;