|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : vilfred 2:5020/400 30 Aug 2001 16:01:42
To : Alexander Bolotnov
Subject : Re: Автоpизация
--------------------------------------------------------------------------------
Привет!
AB> 1. rtfm: httpd: Basic authentication
AB> 2. динамика после правильной индификации.
AB> юзера:пароли хранятся в простом
AB> файлике/базе данных.
AB> 3. создаем документ после индификации и отдаем
AB> его, храним сколько надо. или
AB> еще веселей, создаем документ и кладем его в диру
AB> с нужным .htaccess, который
AB> отдает документы из этой диры только твоему хосту
AB> rtfm apache: mod_access,
AB> потом его умираем. хм, почти веселый вариант
AB> хранить сессию. про прокси молчу.
AB> :))
зачем этот огород с .htaccess? Чего-нибудь типа этой авторизации:
#!/usr/bin/perl -wT
use CGI 'param';
$passwds=param('pass');
open F, "<users.dat"; @users=<F>;
$/="\001"
foreach $ip(@users){
($ip, $pass, $n)=split /\002/, $ip;
&proga() if(ENV{'REMOTE-ADDR'} eq $ip && $passwds eq $pass && $n eq
$na);
push @aa, "1" unless(ENV{'REMOTE-ADDR'} eq $ip && $passwds eq $pass
&& $n eq $na);
}
foreach(@aa){$logs+=$_}
print "Access denied, sorry" if($#aa+1/$logs!=1);
sub proga{
mail
write
haha
hihi...
}
AB> 4. даешь денежку кому-нить, кто это все уже знает
AB> и не только это. не паришься.
AB> Alexander Bolotnov.
AB> Scientia vincere tenebras.
Дима
--
TEAM [Маньяки]
Отправлено через сервер Talk.Ru - http://www.talk.ru
--- ifmail v.2.15dev5
* Origin: Talk.ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
