use CGI qw(:standard); use vars qw(%in); CGI::ReadParse();