#!/usr/local/bin/perl -w
#!c:/perl/bin/perl -w
##
##  Print environment variables sorted by name.
##

print "Content-type: text/html\n\n";

foreach $var (sort(keys(%ENV))) {
  $val = $ENV{$var};
  print "${var}=\"${val}\"<br>\n";
}