summaryrefslogtreecommitdiff
path: root/t/op/gv.t
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2010-09-24 11:46:41 +0100
committerNicholas Clark <nick@ccl4.org>2010-09-24 11:48:51 +0100
commit3d7a9343ce805daaa050171aecb0ab4f37fed18d (patch)
tree2c1d85cf2322479ecbeae64339ef052603ba25a7 /t/op/gv.t
parentbf70f4101a9bd4064c4bc7f03a677f4227ad79a4 (diff)
downloadperl-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.t2
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/gv.t b/t/op/gv.t
index cc8f205a85..3044bd857d 100644
--- a/t/op/gv.t
+++ b/t/op/gv.t
@@ -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");