#! /usr/bin/perl print "Content-type: text/plain\n\n"; print "$_ => $ENV{$_}\n" for keys %ENV;