ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Alexander Ilyankin 2:5059/9.81 06 May 2003 15:44:21
To : Artem Chuprina
Subject : Re: Цифры и слова
--------------------------------------------------------------------------------
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";
AC> Концы строк и если есть, пробелы, тоже надо покоцать.
А каким образом концы строк надо покоцать ?
Удачи!
--- GoldED+/386 1.1.4.5
* Origin: Тра ля ля (2:5059/9.81)
Вернуться к списку тем, сортированных по:
|
