Nice post,
dws. Shouldn't you get the youngsters off
to a good start, though, with a rudimentary
CGI module script?
#!/usr/bin/perl -w
use strict;
use CGI qw(:standard);
print CGI::header(),"\n\n";
print CGI::start_html(),"\n\n";
print CGI::start_table();
print CGI::Tr(CGI::th({-align => 'left'},['KEY','VALUE'])),"\n\n";
foreach my $key (sort keys %ENV ) {
print CGI::Tr( CGI::td( {-align => 'left'},[$key ,$ENV{$key}])),
+"\n";
}
print CGI::end_table(),"\n\n";
print CGI::end_html();
That way, the point is drilled in verbosely, to use CGI.
:-)
And incidentally, for posterity, it will come in handy to visit this link.
mkmcconn