diff options
| author | Karl Williamson <khw@khw-desktop.(none)> | 2010-06-09 14:40:14 -0600 |
|---|---|---|
| committer | David Golden <dagolden@cpan.org> | 2010-06-18 18:43:03 -0400 |
| commit | e6897b1a5db0410e387ccbf677e89fc4a1d8c97a (patch) | |
| tree | 6bde58df5125be7b350ea94874255b04b1f053ea /t/lib | |
| parent | d9bf0e0a91525fcdd8099d78b891aa20066e9d1c (diff) | |
| download | perl-e6897b1a5db0410e387ccbf677e89fc4a1d8c97a.tar.gz | |
Deprecate no space between pattern, following word
This patch raises a deprecated warning on constructs like
$result = $a =~ m/$foo/sand $bar;
which means
$result = $a =~ m/$foo/s and $bar;
Diffstat (limited to 't/lib')
| -rw-r--r-- | t/lib/warnings/toke | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/t/lib/warnings/toke b/t/lib/warnings/toke index 223644236b..6a1a6a579c 100644 --- a/t/lib/warnings/toke +++ b/t/lib/warnings/toke @@ -140,13 +140,16 @@ Use of comma-less variable list is deprecated at - line 4. Use of comma-less variable list is deprecated at - line 4. ######## # toke.c +$a =~ m/$foo/sand $bar; $a = <<; no warnings 'deprecated' ; +$a =~ m/$foo/sand $bar; $a = <<; EXPECT -Use of bare << to mean <<"" is deprecated at - line 2. +Having no space between pattern and following word is deprecated at - line 2. +Use of bare << to mean <<"" is deprecated at - line 3. ######## # toke.c use warnings 'syntax' ; |