use CGI;

print CGI::header();

##</code><code>##

use CGI qw(:standard);

print header;

##</code><code>##

use CGI;

my $q = new CGI;
print $q->header;