Текущие и ожидаемые технические работы
Списки рассылки для пользователей "Зенон Н.С.П."
Вопросы и ответы
Словарь терминов
Тематические статьи
Вход для клиентов
Правила авторизации
Забыли пароль?
sub random_int_in ($$) { my($min, $max) = @_; return $min if $min == $max; ($min, $max) = ($max, $min) if $min > $max; return $min + int rand(1 + $max - $min); }
Вызов функции, например, random_int_in(10,20) вернет целое случайное число между 10 и 20 (включительно).
скопировать в блог