Help for this page

Select Code to Download


  1. or download this
    bash $ ( export QUERY_STRING="foo=bar&baz=foo+bar"; perl x.pl)
    tcsh $ (set QUERY_STRING="foo=bar&baz=foo+bar"; perl x.pl)
    
  2. or download this
    #!/usr/bin/perl
    $\="\n"; $,="=";
    print "Content-Type: text/plain\n";
    map{print $_, $ENV{$_} } keys %ENV;