Исходное сообщение
"Размышления будущем языка Perl 5" Отправлено indie, 05-Дек-08 00:32
># цикл с постусловием >{ print 'Hello'; $i++ } while($i < 10); $ perl -e '$i=0; { print "Hello"; $i++ } while($i < 10); print "\n"; ' syntax error at -e line 1, near ");" Execution of -e aborted due to compilation errors. ~$ perl -e '$i=0; do { print "Hello"; $i++ } while($i < 10); print "\n"; ' HelloHelloHelloHelloHelloHelloHelloHelloHelloHello И  соответственно: >{ print 'Hello'; $i++ } if ($i < 10); # бам! нельзя. ~$ perl -e '$i=0; { print "Hello"; $i++ } if($i < 10); print "\n"; ' syntax error at -e line 1, near ");" Execution of -e aborted due to compilation errors. ~$ perl -e '$i=0; do { print "Hello"; $i++ } if($i < 10); print "\n"; ' Hello