|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alexandr Kostiuchenko 2:463/468.5 15 Jun 2000 00:23:25
To : Alexey Medvedev
Subject : AvtorizaCIYA
--------------------------------------------------------------------------------
Как-то раз (а точнее 13 Jun 00 в 00:11) Alexey Medvedev писал(а) к Aleksey
Barabanov:
>>> Просили-то именно с помощью mod_perl... Hе помню...
AB>> Вот и я о том. При чем тут Perl. Авторизация происходит на
AB>> стороне проведения авторизации. 1-й. Это упомянутый http - basic
[...skipped...]
AM> Hе хочу тебя разочаровывать, но:
AM> <?
AM> if(!($PHP_AUTH_USER=="test" && $PHP_AUTH_PW=="test")) {
AM> Header("WWW-authenticate: basic realm=\"the site\"");
AM> Header("HTTP/1.0 401 Unauthorized"); }
?>>
AM> Это PHP. Легко и удобно... и 3 строки.
AM> Я ожидал от Perl-а большего.
не хочу тебя разочаровывать, но тебе ведь уже указали на mod_perl ?
А просто Perl'ом (CGI mode) это сделать нельзя так же, как _нельзя_ это сделать
PHP в CGI-mode (причину, надеюсь, не нужно называть?).
А ожидать большего можно разве что от сервера, выдающего в ENV при выполнении
CGI кроме AUTH_USER еще и AUTH_PW.
2All: кстати никто не задумывался о написании патча для apache, добавляющего
подобную ф-ю ?
--
mailto: random at info.net.ua //Александр
* Origin: useless (2:463/468.5)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
