#!/usr/bin/perl print "Content-type: text/html\n\n"; print ""; print ""; foreach $env_var (keys %ENV) { print ""; print ""; } print "

$env_var

$ENV{$env_var}

"; print "";