diff options
author | Nicholas Clark <nick@ccl4.org> | 2010-09-24 11:46:41 +0100 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2010-09-24 11:48:51 +0100 |
commit | 3d7a9343ce805daaa050171aecb0ab4f37fed18d (patch) | |
tree | 2c1d85cf2322479ecbeae64339ef052603ba25a7 /t/op/gv.t | |
parent | bf70f4101a9bd4064c4bc7f03a677f4227ad79a4 (diff) | |
download | perl-3d7a9343ce805daaa050171aecb0ab4f37fed18d.tar.gz |
Add a warning to test.pl if quotes are used in one-liners.
Fix all the tests that were using quotes, and (by implication) working
because barewords are treated as strings, and one-liners aren't run under
strict.
Diffstat (limited to 't/op/gv.t')
-rw-r--r-- | t/op/gv.t | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -286,7 +286,7 @@ $| = 1; sub DESTROY {eval {die qq{Farewell $_[0]}}; print $@} package main; -bless \$A::B, 'M'; +bless \$A::B, q{M}; *A:: = \*B::; EOPROG like($output, qr/^Farewell M=SCALAR/, "DESTROY was called"); |