есть локальная сеть.
раздает интернет пользователям прокси-сервер (sqiud). при запуске Internet Explorer'а выпадает диалог где полтьзователь регестрируеться вводя тута имя и пароль... проверяет правильность регистрации скриптик на перле auth.pl#!/usr/bin/perl
$| = 1 ;%Users = (
"guest" => "1"
);
while (<>) {
($user, $passwd) = /^(\S+) (\S+)$/ ;
if ((@Users{$user} eq $passwd) && !($user eq"") && !($passwd eq ""))
{
print "OK\n";
} else
{
print "ERR\n";
};
}храниться ли это имя пользователя в переменных окружения и как его можно выцепть оттуда?... потомучто другой скрипт который запускаеться из-под броузера
#!/usr/bin/perl
use CGI;print "UserName: ", $REMOTE_USER;
ничего не дает... может это не та переменная?
>храниться ли это имя пользователя в переменных окружения и как его можно
>выцепть оттуда?... потомучто другой скрипт который запускаеться из-под броузера
>
>#!/usr/bin/perl
>use CGI;
>
>print "UserName: ", $REMOTE_USER;
>
>ничего не дает... может это не та переменная?
имхо, никак!
весь сквид представляется http-серверу одним-единственным пользователем...PS. а cgi-скрипт запускается не из под браузера, а из под http-сервера.
Абыдно....
>Абыдно....хотя к суррогатный вариант можно использовать такую схему:
1) написать скрипт-редиректор для сквида, который в зависимости от имени пользователя вносил какие-то определенные изменения и/или дополнения в вызываемый url.
2)cgi-скрит должен анализировать изменения url-а и исходя из этого выполнять разные действия.