#!/usr/local/bin/perl --
use CGI ':standard';

print header, start_html ('Enviro Variables');
foreach $item((keys %ENV))
{
print "Key=$item Value=$ENV{$item}", br;
}
print end_html;