Mega Code Archive

 

Categories / Perl / CGI

 

Explicitly name the content type and status arguments

#!/usr/bin/perl use strict; use warnings; use CGI; my $cgi=new CGI; print $cgi->header(-type=>'text/html',                    -status=>'401 Authorization Required',                    -authname=>'Tom');