perl5.10 и perl5.12 проблема в while цикле
Добавлено: 2011-03-10 19:13:55
делаю самое элементарное
работает!
работает на версии:
но когда, пытаюсь на сервер
данный участок кода с while идет в безконечность
как только его закомментирвоать, то безконечности нету!
что поменялось в while на v5.12.1?
т.е. мне нужно получить массив или хэш или такие строки $1."%".$2
Код: Выделить всё
$h->{$1."%".$2}++ while ( $CGI->{in} =~ /(\d)(\d{5})/g );
работает на версии:
Код: Выделить всё
This is perl, v5.10.1 (*) built for i486-linux-gnu-thread-multi
но когда, пытаюсь на сервер
Код: Выделить всё
This is perl 5, version 12, subversion 1 (v5.12.1) built for i386-freebsd-thread-multi-64int
как только его закомментирвоать, то безконечности нету!
что поменялось в while на v5.12.1?
т.е. мне нужно получить массив или хэш или такие строки $1."%".$2