|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/371.32 18 Jan 2001 19:58:42 To : Victor McSmith Subject : Re: Случайное число -------------------------------------------------------------------------------- В твоём письме от Mon, 15 Jan 2001 16:33:15 +0300 написано: >>> Hарод, как можно на perl сгенерировать случайное число? AVG>> однажды такое видел: AVG>> $rd = time * $$ / unpack("%L*", `ps axww | gzip`); AVG>> $rd =~ s/\.//g; AVG>> print "$rd\n"; VM> А вот как бы /dev/random заиспользовать или где почитать на предмет сего? Math::TrulyRandom. -- Artem Chuprina E-mail: ran@ran.pp.ru Programmer FIDO: 2:5020/371.32 Memonet Ltd. Phone: +7-095-284-1356 --- slrn/0.9.6.3-as (Linux) * Origin: AKA с подствольным плюсомётом (2:5020/371.32) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/73315d94ce8cb.html, оценка из 5, голосов 10
|