List of private/nph-401.cgi

このファイルは、実行が許可されています。
Thu Apr 26 03:37:43 2018

戻る

TEXTAREA で表示(カット&ペーストむき)

#!/usr/local/bin/perl5

    print $ENV{'SERVER_PROTOCOL'}," 401 Unauthorized","\n";
    print 'Server: ',$ENV{'SERVER_SOFTWARE'},"\n";
    print 'WWW-Authenticate: Basic realm="ByPassword"',"\n";
    print "Content-type: text/html\n\n";

    print <<END;
        <HEAD><TITLE>Authorization Required</TITLE></HEAD>
        <BODY><H1>Authorization Required</H1>
        This server could not verify that you
        are authorized to access the document you
        requested.  Either you supplied the wrong
        credentials (e.g., bad password), or your
        browser doesn't understand how to supply
        the credentials required.<P>
        </BODY>
END
exit;



戻る