#! F:\perl\bin\perl

use HTTP::QueryString;
print "Content-Type: text/html\n\n";
$qs = new HTTP::QueryString;
$qs->parse;
$keys = HTTP::QueryString::param;
print $keys->{'MAIN'}, '\n';