use CGI; $query = CGI::new(); print $query->header(-type=>'text/html', -status=>'403 Forbidden'); exit;