|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Marsel Kirsanov 2:5023/10.91 18 Jul 2000 00:23:49 To : Dmitry Tweritin Subject : Как сделать такое... -------------------------------------------------------------------------------- Добрый вечер, Dmitry ! MK>> Вот есть, к примеру, такая программа! MK>> print "Сегодня у меня хорошее настроение\n"; MK>> А как сделать так, чтобы вместо слова "хорошее" печаталось любое MK>> из перечисленных через запятую переменыых? $nastrornie = 'хлохое, MK>> хреновое, отвратительное'; и т.д. DT> my $mood = 'плохое, хреновое, отвратительное'; DT> my @mood = split /\,\s+/, $mood; DT> print 'Сегодня у меня '.$mood[rand @mood]." настроение\n"; А как можно сделать, чтобы он из файла эти переменные брал, учитывая, что каждая переменная на новой строчке? Sincerely, Marsel. --- Summer moved on... plase write me anytime to marsel@emux.net * Origin: My love moved down. (2:5023/10.91) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/222993973a39f.html, оценка из 5, голосов 10
|