diff options
author | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2017-06-02 15:47:02 +0100 |
---|---|---|
committer | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2017-06-05 16:06:41 +0100 |
commit | c6e25b0912953f93b48695f7e584ade418189d1d (patch) | |
tree | 639151c4d57b030b2a1eddb833b2527e9e982bcf /t/op/lex.t | |
parent | 489c16bfa14d460701bd76a4a4f0658f1200509a (diff) | |
download | perl-c6e25b0912953f93b48695f7e584ade418189d1d.tar.gz |
Forbid use of bare << to mean <<""
It has ben deprecated since perl 5.000.
Diffstat (limited to 't/op/lex.t')
-rw-r--r-- | t/op/lex.t | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/t/op/lex.t b/t/op/lex.t index 7a05ee98c1..90be519524 100644 --- a/t/op/lex.t +++ b/t/op/lex.t @@ -10,14 +10,13 @@ BEGIN { chdir 't' if -d 't'; require './test.pl'; } plan(tests => 36); { - no warnings 'deprecated'; - print <<; # Yow! + print <<''; # Yow! ok 1 # previous line intentionally left blank. my $yow = "ok 2"; - print <<; # Yow! + print <<""; # Yow! $yow # previous line intentionally left blank. |