Help for this page
my $q = CGI->new; instead of my $q = CGI->new( { } );
. . . reads all the POST data and makes it unavailable to your main pr +ogram
sub new { bless {}, shift }