|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 06 May 2003 14:23:05
To : Alexander Ilyankin
Subject : Re: Цифры и слова
--------------------------------------------------------------------------------
Здравствуй, Alexander Ilyankin.
AI> Привет, All!
AI> Почему скрипт работает правильно только в том случае, если $ran - число
AI> (цифра).
AI> А как сделать чтобы $ran мог принимать и буквы и цифры ?
AI> Вместо == ставлю eq - не получается :(
Концы строк и если есть, пробелы, тоже надо покоцать.
AI> open (TXTFILE, "1.txt");
AI> @lines = <TXTFILE>;
AI> close(TXTFILE);
AI> $max = "ет";
AI> foreach $temp (@lines) {
AI> $max = "ДА" if $temp == $ran;
AI> }
AI> print "$max";
AI> Удачи!
--
Artem Chuprina
RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/122.256, ICQ: 13038757
--- ifmail v.2.15dev5
* Origin: Leninsky 45 home network (2:5020/400)
Вернуться к списку тем, сортированных по:
|
