use CGI qw(:standard -debug);
my $cgi = new CGI;
print Data::Dumper->Dump([$cgi], ['cgi']);