diff options
| author | Karl Williamson <public@khwilliamson.com> | 2010-09-20 19:16:24 -0600 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2010-09-22 22:56:54 -0700 |
| commit | dff5e0c4913cbbc4e73cece5cd747e7aa222db67 (patch) | |
| tree | 3dc1918a78624a7fb3e87fe0ab365f90fb1fc90e /ext/re | |
| parent | 9de15fec376a8ff90a38fad0ff322c72c2995765 (diff) | |
| download | perl-dff5e0c4913cbbc4e73cece5cd747e7aa222db67.tar.gz | |
re.pm: Change comment to use new (?^...)
Diffstat (limited to 'ext/re')
| -rw-r--r-- | ext/re/re.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/re/re.pm b/ext/re/re.pm index 9341feb746..2d6784a6a6 100644 --- a/ext/re/re.pm +++ b/ext/re/re.pm @@ -415,7 +415,7 @@ C<qr//> with the same pattern inside. If the argument is not a compiled reference then this routine returns false but defined in scalar context, and the empty list in list context. Thus the following - if (regexp_pattern($ref) eq '(?i-xsm:foo)') + if (regexp_pattern($ref) eq '(?^i:foo)') will be warning free regardless of what $ref actually is. |