use CGI;
my $input = new CGI;
my @var = $input->param('var');
####
use CGI;
use Data::Dumper;
my $input = new CGI;
my @var = $input->param('var');
print "Content-type:text/plain\n\n";
print Dumper \@var;
####
my $query = new CGI;
$query->import_names('input');