parser

Написать ответ на текущее сообщение

 

 
   команды управления поиском

Регулярные выражения: что я делаю не правильно?

onlyyours 24.08.2010 10:28 / 24.08.2010 10:31

Есть строка, содержащая текст "слово слов 324755562384". Задача: в числе разбить запятыми тысячи.

Код на Parser3:
@main[]
<html><body>
$text[слово слов 324755562384]
$text<br /><br />
$text[^text.match[(?<=\d)(?=(\d\d\d)+^$)][g][,]]
$text
</body></html>
И аналогичный код написал на Perl:
#!/usr/bin/perl
print "Content-Type: text/html\n\n";
print "<html><body>\n";
$text = "слово слов 324755562384";
print "$text<br /><br />\n";
$text =~ s/(?<=\d)(?=(\d\d\d)+$)/,/g;
print "$text\n";
print "</body></html>\n";
В первом случае результат работы "слово слов 324,,755562384".
Во втором случае результат "слово слов 324,755,562,384".

Подскажите, почему у меня парсер выдает не правильный результат?