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/array.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/array.t')
| -rw-r--r-- | t/op/array.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/array.t b/t/op/array.t index e36fd287ed..f100e2d2df 100644 --- a/t/op/array.t +++ b/t/op/array.t @@ -276,7 +276,7 @@ tary(); my $got = runperl ( prog => q{ sub X::DESTROY { @a = () } - @a = (bless {}, 'X'); + @a = (bless {}, q{X}); @a = (); }, stderr => 1 |