use Data::Dumper;
print $cgi->pre( Dumper( $cgi ) );