|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alexander V. Gaiduk 2:5020/400 03 Mar 2008 15:17:52
To : Andrei Protasovitski
Subject : Re: баг Перла или баг мозга?
--------------------------------------------------------------------------------
"Andrei Protasovitski" <andrei.protasovitski@gmail.com> сообщил/сообщила в
новостях следующее: news:MSGID_2=3A450=2F186.0_2228854a@fidonet.org...
> Доброго здоровья!
>
> Alexander V. Gaiduk пишет:
>> 1. если раскоментировать фрагмент "my $g = $g;" - работает правильно.
> ^^^^^^^^^
>>
>> 2. если в регэкспе (помеченом **) убрать модификатор "g"
>> работает правильно.
> ^^^^^^^^^
>>
>> 3. если в данных блок "<zz>...</zz>" поднять над блоком <px>...<.px>
>> работает правильно.
> ^^^^^^^^^
>>
>> в текущей версии работает неправильно.
> ^^^^^^^^^^^
>>
>> у кого какие соображения будут по этому поводу?
>
> В первую очередь хотелось бы узнать, что есть "правильно", а что
> "неправильно".
я думал xоть в отладчике то пройдёте алгоритм...
неправильно - т.е. не выполняется цикл:
foreach my $p ($g =~ m!<pp>(.+?)</pp>!sg) { $pp .= "($p)"; }
точнее не выполняется операция:
@array = $g =~ m!<pp>(.+?)</pp>!sg;
т.е. @array остаётся пустым.
> --
> Andrei Protasovitski
> mailto: andrei.protasovitski()gmail.com
--
С уважением, Александр Гайдук, вебмастер мэрии Архангельска
$_='p<5H1>45BO&]Ov194E;Ok71Fo1B839DI]BEm';tr#\x20-~#P-~\x20-O#;print;
--- ifmail v.2.15dev5.4
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: баг Перла или баг мозга? 