in reply to Accessing CGI objects from within a 'require'-ed file?
sub outputPOST { my $cgi = $main::GLOBAL{'query'}; print $cgi->Vars; } [download]