Help for this page
my $q = new CGI;
read (STDIN, $query, $ENV{'CONTENT_LENGTH'}); ## process string ....