|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Victor Wagner 2:5020/400 30 Mar 2002 00:23:06
To : Andrey Sapozhnikov
Subject : Re: Hесколько вопросов к Ан дрею
--------------------------------------------------------------------------------
l.su> <a825he$18jv$1@ddt.demos.su> <3CA4A6AA.7020604@icb.chel.su>
l.su> <3CA4AB16.3D03F9C@apmsun.mpei.ac.ru> <3CA4AE35.9010904@icb.chel.su>
From: vitus@45.free.net (Victor Wagner)
Andrey Sapozhnikov <sapa@icb.chel.su> wrote:
AS> Konstantin Tokar wrote:
>>>В определенных случаях эта конструкция может не отработать
>>>
>> Сработает. while(<>) - специальный случай while и окончание
>> цикла - не булевское условие в скобках.
AS> Hе сработает. Внимательно перечитываем письмо. Там в
AS> скобках выражение присваивания: while ($FileLine = <FILE>),
AS> а не while (<FILE>). Про то, что второй вариант является
AS> исключением, я прекрасно знаю.
Андрей, в следующий раз читай документацию прежде чем так говорить.
Я тоже хотел то же самое ответить, но что-то (возможно, мрачный взгляд
Артема Чуприны в спину) меня остановило. Я полез в perldoc perlop
А там написано:
Anyway, the following lines are equivalent to each other:
while (defined($_ = <STDIN>)) { print; }
while ($_ = <STDIN>) { print; }
while (<STDIN>) { print; }
for (;<STDIN>;) { print; }
print while defined($_ = <STDIN>);
print while ($_ = <STDIN>);
print while <STDIN>;
and this also behaves similarly, but avoids the use of $_ :
while (my $line = <STDIN>) { print $line }
--
Он охраняет права так строго, что никто не может ими
воспользоваться.
--- С.Е. Лец
--- ifmail v.2.15dev5
* Origin: Free Net of Leninsky,45 (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
