CGI Perl

  1. Home
  2. Perl
  3. CGI
  4. Authorization-required response
#!/usr/bin/perl
use warnings;
use strict;
use CGI;
my $cgi=new CGI;
print $cgi->header('text/html','401 Authorization Required');