dump.cgi

When you need to see what information is actually received by a script, this will do the job quite nicely. It will accept information that arrives method GET or POST and print whatever it receives in the browser.

#!/usr/bin/perl
use strict;
my $fields = '';
if ($ENV{'REQUEST_METHOD'} eq 'GET') { $fields = $ENV{QUERY_STRING}; }
else { read(STDIN,$fields,$ENV{'CONTENT_LENGTH'}); }
print "Content-type: text/plain\n\n".join("\n",split(/&/,$fields));

Will Bontrager