diff options
| author | Ævar Arnfjörð Bjarmason <avar@cpan.org> | 2010-09-30 09:57:44 +0000 |
|---|---|---|
| committer | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2010-09-30 11:09:40 +0100 |
| commit | 9b846e3022e82ccd8f7be619cb0024b3fe0efbb4 (patch) | |
| tree | 7e37fba45ba6ee1eec7d1980cd35c37cb0e525c5 /pod | |
| parent | e8a67806ef1eb7668a47c953db3ec6e6d80c8b67 (diff) | |
| download | perl-9b846e3022e82ccd8f7be619cb0024b3fe0efbb4.tar.gz | |
perlretut: incorrect output in "Non-capturing groupings"
Change the example split output in a "Non-capturing groupings" example
from ('12','a','34','b','5') to ('12','a','34','a','5'). This way
it'll match the example code that goes along with it:
split /(a|b)+/, "12aba34ba5"
Reported-by: Antonio Bonifati <antonio.bonifati@gmail.com>
Diffstat (limited to 'pod')
| -rw-r--r-- | pod/perlretut.pod | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pod/perlretut.pod b/pod/perlretut.pod index f2187179c2..3b7413efa9 100644 --- a/pod/perlretut.pod +++ b/pod/perlretut.pod @@ -925,7 +925,7 @@ elements gathered from a split operation where parentheses are required for some reason: $x = '12aba34ba5'; - @num = split /(a|b)+/, $x; # @num = ('12','a','34','b','5') + @num = split /(a|b)+/, $x; # @num = ('12','a','34','a','5') @num = split /(?:a|b)+/, $x; # @num = ('12','34','5') |