|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Yuri Khachaturian 2:5020/975 10 Aug 2001 13:15:16 To : All Subject : mod_perl --------------------------------------------------------------------------------
было хранить пароли в БД MySQL в шифрованном виде типа password("passwd")
как это делает mysql?
Есть:
.htaccess:
AuthName "URVES.RU ADMIN STAFF"
AuthType Basic
PerlAuthenHandler Apache::AuthDBI::authen
PerlSetVar Auth_DBI_data_source
DBI:mysql:urves:localhost:3306","urves","media"
PerlSetVar Auth_DBI_username username
PerlSetVar Auth_DBI_password password
PerlSetVar Auth_DBI_pwd_table users
PerlSetVar Auth_DBI_uid_field login
PerlSetVar Auth_DBI_pwd_field passwd
PerlSetVar Auth_DBI_encrypted off
>если тут сказать on, то пароли не проходят.
require valid-user
====
startup.pl
$ENV{MOD_PERL} or die "not running under mod_perl!";
use Apache::Registry;
use Apache::Constants;
use Apache::DBI ();
use DBI ();
use Apache::AuthDBI ();
use Carp ();
$SIG{__WARN__} = \&Carp::cluck;
);
Apache::DBI->connect_on_init
(DBI:mysql:urves:localhost:3306","user","passwd",
{
PrintError => 1, # warn() on errors
RaiseError => 0, # don't die on error
AutoCommit => 1, # commit executes immediately
}
);
====
--
Cheers, Yuri Khachaturian,
The Official Gamma Ray fanclub in Russia - http://www.gammaray.ru
SMS: yukh@email2sms.ru (up to 160 chars)
--- tin/1.5.6-20000803 ("Dust") (UNIX) (FreeBSD/4.4-PRERELEASE (i386))
* Origin: Necrosoft Studio (2:5020/975)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/306997acbe6f3.html, оценка из 5, голосов 10
|