#!/usr/local/bin/perl
# Jaime Prilusky, 2004
# store this script with a name ending with .cgi 
# in your public_html directory, and give it mode 755
# call it from a web browser with a URL:
# http://bicourse.weizmann.ac.il/~youruserid/scriptname.cgi

use CGI;  

  my $q = new CGI;  

  print $q->header();

  print qq{<table border='1' bgcolor='#cecece'>
  <tr><th colspan='2'>Content of the ENV hash</th><?tr>
  };

  foreach $k (sort keys %ENV) {
    print "<tr><td>$k</td><td>$ENV{$k}</td></tr>";
  }

  print "</table>";