Forum Webscript.Ru

Программирование => Perl => Тема начата: perl novice от 03 Мая 2007, 18:07:45

Название: Функция rand ...
Отправлено: perl novice от 03 Мая 2007, 18:07:45
Добрый день!
Как в Perl реализовать слуайный выбор двух строковых значений?

rand("masha","olia") - не работает.

и как организовать случайный выбор целых чисел от -100 до 100

так же не понятно как можно организовать случайный выбор чисел от 0 до 100 , допустим чтобы выбирало 58,99 или 45,12 - то есть с двумя разрядами после запятой!

Заранее всем спасибо! Помогите плиз!
Название: Функция rand ...
Отправлено: arto от 03 Мая 2007, 18:37:14
rand (2) < 1 ? "masha" : "olia";
Название: Функция rand ...
Отправлено: vladsu от 03 Мая 2007, 20:06:16
Для второго случая:

for (1..10){
   print int rand(100)-rand(100),"\\n";
}


Для третьего:

for (1..10){
   printf "%.2f\\n",rand(100);
}
Название: Функция rand ...
Отправлено: perl novice от 24 Мая 2007, 19:51:37
огромное спасбио! Тока вот в чем вопрос для третьег если мне не надо распечатывать, а надо передать переменой: $foo = "%.2f\\n",rand(100);  не совсем правильно работает.
Название: Функция rand ...
Отправлено: Phoinix от 25 Мая 2007, 12:00:56
vladsu
Цитировать
for (1..10){
   print int rand(100)-rand(100),"\\n";
}

Это еще зачем?

print int rand(200) - 100,"\\n";
Название: Функция rand ...
Отправлено: vladsu от 25 Мая 2007, 15:23:56

for (1..10){
   my $var = sprintf "%.2f\\n",rand(100);
}


Цитировать
Phoinix:
Это еще зачем?

Да не зачем, что пришло в голову первым, то и написал.