use CGI;
my $q = CGI->new();
my $a = $q->param('a');