ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Vladimir Podgorny 2:5020/400 15 Apr 2002 15:01:23
To : Igor Gerdler
Subject : Re: Замечание и свой вариант
--------------------------------------------------------------------------------
Igor Gerdler <perl@doreworld.com> wrote:
>
>> my $uniq = time . $$;
>>
>> PID процесса в момент времени time() есть величина заведомо уникальная.
> Кроме случая использования mod_perl где pid процесса может не изменятся
> очень долго :о)
>
> Поэтому для случая, когда используется mod_perl и
>> Формирование кода из текущей даты+времени не помогает - при большой
>> посещаемости получаются двойные коды
> Ваш совет не подходит.
>
> Всего доброго!
> Игорь Гердлер
>
> P.S. Могу предложить вариант
> my $user_ip = $ENV{REMOTE_ADDR};
> $user_ip =~ s'\.''g;
> my $seed = $user_ip.time();
Тоже не катит однако. С одного IP может одновременно (в пределах одной
секунды - либо Time::HiRes) прийти несколько запросов. В качестве альтернативы
мне видится нечто, что основывается на time(), $$ и $ENV{'UNIQUE_ID'} -
последняя переменная будет разной для каждого http-запроса.
--
VP992-RIPE
--- ifmail v.2.15dev5
* Origin: Adamant ISP news server (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
