use CGI ':standard';

##</code><code>##

use CGI ':standard';
print header, start_html(-title => 'CGI test');
print p('foo is ', param('foo'), '.');
print end_html;