diff options
Diffstat (limited to 't')
-rw-r--r-- | t/lib/warnings/toke | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/t/lib/warnings/toke b/t/lib/warnings/toke index 425b613485..59dc752dfc 100644 --- a/t/lib/warnings/toke +++ b/t/lib/warnings/toke @@ -956,3 +956,16 @@ EXPECT "\c," is more clearly written simply as "l" at - line 4. "\c`" is more clearly written simply as "\ " at - line 5. "\c{" is deprecated and is more clearly written as ";" at - line 7. +######## +# toke.c +use warnings 'syntax' ; +my $a = qr/foo/du; +$a = qr/foo/laai; +$a = qr/foo/lil; +no warnings 'syntax' ; +my $a = qr/foo/du; +EXPECT +Regexp modifiers "/d" and "/u" are mutually exclusive at - line 3, near "= " +Regexp modifiers "/l" and "/a" are mutually exclusive at - line 4, near "= " +Regexp modifier "/l" may not appear twice at - line 5, near "= " +BEGIN not safe after errors--compilation aborted at - line 6. |