use CGI qw(:standard); use vars qw(%in); CGI::ReadParse(); #### $body .= param($_) . "\n" for param; #### $body .= param($_) . "\n" for @param;