diff options
| author | Mark-Jason Dominus <mjd@plover.com> | 2002-03-28 05:36:03 -0500 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-28 16:23:41 +0000 |
| commit | 64e578a2028c106ba475fea230ca8011441e4bed (patch) | |
| tree | e4958738c170e7c97e64f974a409953f77e3aa41 /t/lib | |
| parent | 52ea3e69a0eb35af2d24bda5dabccf9b9600bfe4 (diff) | |
| download | perl-64e578a2028c106ba475fea230ca8011441e4bed.tar.gz | |
warning at use of /c modifier with s///
Message-ID: <20020328153603.11992.qmail@plover.com>
p4raw-id: //depot/perl@15586
Diffstat (limited to 't/lib')
| -rw-r--r-- | t/lib/warnings/toke | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/t/lib/warnings/toke b/t/lib/warnings/toke index af67277a3a..73dd229a9e 100644 --- a/t/lib/warnings/toke +++ b/t/lib/warnings/toke @@ -106,6 +106,8 @@ toke.c AOK Use of /c modifier is meaningless without /g + Use of /c modifier is meaningless in s/// + Mandatory Warnings ------------------ Use of "%s" without parentheses is ambiguous [check_uni] @@ -745,8 +747,10 @@ Unrecognized escape \q passed through at - line 4. # 20020328 mjd@plover.com at behest of jfriedl@yahoo.com use warnings 'regexp'; "foo" =~ /foo/c; +"foo" =~ /foo/cg; no warnings 'regexp'; "foo" =~ /foo/c; +"foo" =~ /foo/cg; EXPECT Use of /c modifier is meaningless without /g at - line 4. ######## @@ -755,7 +759,10 @@ Use of /c modifier is meaningless without /g at - line 4. use warnings 'regexp'; $_ = "ab" ; s/ab/ab/c; +s/ab/ab/cg; no warnings 'regexp'; s/ab/ab/c; +s/ab/ab/cg; EXPECT -Use of /c modifier is meaningless without /g at - line 5. +Use of /c modifier is meaningless in s/// at - line 5. +Use of /c modifier is meaningless in s/// at - line 6. |