Help for this page
use CGI; print CGI::header();
use CGI qw(:standard); print header;
use CGI; my $q = new CGI; print $q->header;