#!/usr/bin/perl
printf "Content-type: text/html\n\n\n";
printf "%s -- %s<br>\n",$_,$ENV{$_} foreach sort keys %ENV;