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

Environment variable	Value
$_:	$ENV{$_}

"; print "";