|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Victor McSmith 2:5020/496.22 15 Jan 2001 17:33:15 To : Alexander V. Gaiduk Subject : Случайное число --------------------------------------------------------------------------------
15 января 2001 11:17, Alexander V. Gaiduk отписал к All:
>> Hарод, как можно на perl сгенерировать случайное число?
AVG> однажды такое видел:
AVG> $rd = time * $$ / unpack("%L*", `ps axww | gzip`);
AVG> $rd =~ s/\.//g;
AVG> print "$rd\n";
А вот как бы /dev/random заиспользовать или где почитать на предмет сего?
Да будет твой путь длинней, чем тропа за спиной!
Victor
--- GoldED/LNX 3.00.Beta5 UNREG
* Origin: (2:5020/496.22)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/39463a632688.html, оценка из 5, голосов 10
|