<% my $env = $Request->ServerVariables(); for(sort keys %$env) { print "$_: $env->{$_}
\n"; } %>