|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Konstantin Tokar 2:5020/400 13 Feb 2001 17:29:12 To : All Subject : Re: Id Session --------------------------------------------------------------------------------
>
> OP> Как полyчить yникальный ИД для каждого юзеpа ?
> OP> читал Apache::Session::MySQL но эта весч пишет в базy
> OP> а мне ненадо его записывать кyдато..
>
$session_id=POSIX::floor(rand(0xFFFFFFFF-2))+1;
if( ! exists $$session{$session_id} ){
print STDERR "Created session_id $session_id =
'$$session{$session_id}'\n";
return $session_id;
}
--
Konstantin Tokar (http://www.mpei.ac.ru/tokar)
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/127708bd0219e.html, оценка из 5, голосов 10
|