my $q = CGI->new; instead of  my $q = CGI->new( { } );

##</code><code>##

. . . reads all the POST data and makes it unavailable to your main program

##</code><code>##

sub new { 
	bless {}, shift 
}