use CGI ();
my $q = CGI->new;
print $q->header;
print $q->b("Hello");