use CGI qw/: standard/; my $q = new CGI;