[Moscow.pm] Нашёл ошибку в Perl regexp
Сергей Мартынов
sergey на martynov.info
Пн Июл 7 01:56:40 PDT 2008
>> Perl на всех платформах при трансляции (!) программки
> Сергей, а что значит "трансляция (!)" программы на Perl?
Видимо, имеется в виду стадия компиляции. А действительно, забавный баг:
$ perl -v
This is perl, v5.8.8 built for i386-freebsd-64int
$ perl -e 'BEGIN { print 1 } map{while(1){}}@a; END { print 2 }'
12
Но
% perl -v
This is perl, v5.8.2 built for i386-freebsd
% perl -e 'BEGIN { $|++; print 1 } map{while(1){}}@a; END { print 2 }'
1^C
- виснет :)
--
С уважением, Сергей Мартынов.
Подробная информация о списке рассылки Moscow-pm