CGI Perl

#!/usr/bin/perl -w
use strict;
print "Content-Type: text/plain\n";
print "\n";
foreach (sort keys %ENV) {
    print "$_ = $ENV{$_}\n";
}