use CGI qw(:all);
my $result = param('foo');