🚀 go-pugleaf

On Sun, 29 Jan 2012 09:44:54 +0000 (UTC), Stachu 'Dozzie' K. wrote:
> On 2012-01-28, tomjas <tomjas@WYTNIJTOpoczta.onet.pl> wrote:
>> Próbuję sobie przypomnieć regexpy korzystając z perlretut. I mam problem
>> z funkcją split, a mianowicie:
> [...]
>> print join(",",split /(a|b)+/,"12aba34ba5") # wynik: 12,a,34,a,5
>>
>> Może mi ktoś łopatologicznie wytłumaczyć krok po kroku w jaki sposób
>> perl dopasowuje wzorzec i dzieli ten ciąg?
>
> perldoc -f split, szukasz opisu dla regexpów z nawiasami.
>
Ech... Na to, to akurat wpadłem, ale za diabła nie rozumiem.
"If the PATTERN contains parentheses, additional list elements are
created from each matching substring in the delimiter."
Tzn, rozumiem to, ale w takim razie dlaczego w powyższym przykładzie
w wyniku nie ma "b"? Ja rozumuję tak:
perl szuka po kolei w ciągu najpierw wzorca "a" - mija "12" dochodzi do
"a", dalej szuka bo we wzorcu jest "+" - następnym elementem w ciągu
jest "b" więc nie pasuje, ale pasuje "b" z wzorca - idzie dalej bo znów
"+" - dalej "a" więc nie pasuje. Zatem ciągiem rozdzielającym jest "ab",
więc do pierwszego elementu tablicy wrzuca "12", a w drugim powinien być
ciąg rozdzielający bo przecież są nawiasy. Co źle rozumiem?