use CGI;
$query = CGI::new();
print $query->header(-type=>'text/html',
	                 -status=>'403 Forbidden');
print $query->start_html('Acesss Forbidden!');
print $query->h1('Access Forbidden!');
print $query->p("Access to this resource is forbidden.");
print $query->h2('Error 403');
print $query->end_html();