#!/usr/local/bin/perl
# Jaime Prilusky, 2002

  print "content-type: text/html\n\n";
  print "<pre>";

  foreach $k (keys %ENV) {
    print "$k \t $ENV{$k}\n";
  }