|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Dmitry Tweritin 2:5020/1978.15 24 Jul 2000 16:21:35 To : Marsel Kirsanov Subject : Re: Как сделать такое... --------------------------------------------------------------------------------
MK> Вот есть, к примеру, такая программа!
MK> print "Сегодня у меня хорошее настроение\n";
MK> А как сделать так, чтобы вместо слова "хорошее" печаталось любое из
MK> перечисленных через запятую переменыых?
MK> $nastrornie = 'хлохое, хреновое, отвратительное'; и т.д.
my $mood = 'плохое, хреновое, отвратительное';
my @mood = split /\,\s+/, $mood;
print 'Сегодня у меня '.$mood[rand @mood]." настроение\n";
snaky [mailto:snaky@ok.ru]
---
* Origin: Don't worry, the next message will be better (2:5020/1978.15)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/27893397c356d.html, оценка из 5, голосов 10
|