diff options
author | Ilya Zakharevich <ilya@math.berkeley.edu> | 1998-11-25 18:33:45 -0500 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-11-28 18:35:35 +0000 |
commit | 22e551b9ed23de1d5af9977d67389142f4d41cc5 (patch) | |
tree | 076d061e252db2b367185a92e907bc710c9bee7d /pp.c | |
parent | f2ac83ee9b0351aafadde538d84d97d64ef7e570 (diff) | |
download | perl-22e551b9ed23de1d5af9977d67389142f4d41cc5.tar.gz |
Fix \G in REx without //g
Message-Id: <199811260433.XAA29281@monk.mps.ohio-state.edu>
p4raw-id: //depot/perl@2365
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -4672,7 +4672,7 @@ PP(pp_split) else { maxiters += (strend - s) * rx->nparens; while (s < strend && --limit && - CALLREGEXEC(rx, s, strend, orig, 1, Nullsv, NULL, 0)) + CALLREGEXEC(rx, s, strend, orig, 1, sv, NULL, 0)) { TAINT_IF(RX_MATCH_TAINTED(rx)); if (rx->subbase |