Select Code to Download

#!/usr/bin/perl --

use Data::Dumper;
print "Content-Type: text/plain\n\n",
      Dumper \%ENV;

$VAR1 = {
          'SCRIPT_NAME' => '/cgi/test-cgi',
          'SERVER_NAME' => '[censored]',
...
          'DOCUMENT_ROOT' => '/Library/WebServer/Documents',
          'MOD_PERL' => 'mod_perl/1.29'
        };

$VAR1 = {
          'SCRIPT_NAME' => '/perl/test-cgi',
          'SERVER_NAME' => '[censored]',
...
          'DOCUMENT_ROOT' => '/Library/WebServer/Documents',
          'MOD_PERL' => 'mod_perl/1.29'
        };