LINUX.ORG.RU

Проблема с авторизацией в Perl


0

0

Hi all ! Проблема такая: Есть perl cgi скрипт который кидает стандартый заголовок с стребованием авторизации в браузер (соотв он лежит в каталоге cgi-bin)..... Вот тут прочитал как это делать: http://www.opennet.ru/base/dev/cgi_auth_401.txt.html т е берется файл .htaccess со след содержимым: ------------------ .htaccess ------------------- <Files "401.cgi"> RewriteEngine On RewriteRule .* - [E=REMOTE_USER:%{HTTP:Authorization},L] </Files> --------------------- eof ---------------------- файл "401.cgi" : #!/usr/bin/perl -w use strict; use CGI;

if (!$ENV{'REMOTE_USER'}) { my $q = CGI->new; print $q->header(-status => 401, -www_authenticate => 'Basic realm="test"', -type => 'text/html'), $q->start_html('Authorization required'), $q->h2('Authorization required'), $q->end_html; }

.... В результате запуска скрипта - он не работает ... т е окошко с авторизацией выдается а вот условие if (!$ENV{'REMOTE_USER'}) { } не выполняется... почему ?

anonymous

Точно не скажу, но насколько я слышал для получения доступа к авторизованному имени пользователя нужно в апаче ставить mod_rewrite.

UncleAndy ★★★
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.