You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
use warnings;
|
|
use strict;
|
|
use CGI qw( :standard );
|
|
|
|
print header(), start_html( "Environment Variables" );
|
|
|
|
print '<table>';
|
|
|
|
foreach my $variable ( sort( keys %ENV ) ) {
|
|
print Tr( td( b( "$variable:" ) ),
|
|
td( i( $ENV{ $variable } ) ) );
|
|
}
|
|
|
|
print '</table>', end_html(); |