#!/usr/bin/perl -w

use strict;
use CGI qw(:standard); 
use Data::Dumper;

print header, start_html('Environment vars');
print pre(Dumper(\%ENV)), end_html;