Вот я тут обнаружил, что можно apache-у посылать такой вот заголовок.
use CGI qw(:standard);
print header(-Status=>'401 Authorization Required',
-'WWW-Authenticate'=>'Basic realm="TEST"',
-'Conection'=>'Close',
-type=>'text/html');
но увы он работает только для того скрипта, который выдает такой заголовок.
--
("`-''-/").___..--''"`-._ With best regards,
`o_ o ) `-. ( ).`-.__.`) Andrew Stroganow
(_Y_.)' ._ ) `._ `. ``-..-' E-mail:worm@xxxxxxxxx
_..`--'_..-_/ /--'_.' .' ICQ #UIN:15606140
(il).-'' (li).' ((!.-' AAS79-RIPE
-------------------------------------------------------------------------
... Прощай, смертный. С тобой был Великий Worm, гроза пивных ларьков.
=============================================================================
= Apache-Talk@xxxxxxxxxxxxx mailing list =
Mail "unsubscribe apache-talk" to majordomo@xxxxxxxxxxxxx if you want to quit.
= Archive avaliable at http://www.lexa.ru/apache-talk =
"Russian Apache" includes software developed
by the Apache Group for use in the Apache HTTP server project
(http://www.apache.org/) See
Apache LICENSE.
Copyright (C) 1995-2001 The Apache Group. All rights reserved.
Copyright (C) 1996 Dm. Kryukov; Copyright (C)
1997-2009 Alex Tutubalin. Design (C) 1998 Max Smolev.