use CGI qw(:standard);

my %params = CGI::Vars();
print header();