SYN SYN

[p5sagit/p5-mst-13.2.git] / t / op / assignwarn.t

diff --git a/t/op/assignwarn.t b/t/op/assignwarn.t
index 57e89c4..2d05b82 100755 (executable)
--- a/t/op/assignwarn.t
+++ b/t/op/assignwarn.t
@@ -12,8 +12,8 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 
-$^W = 1;
 my $warn = "";
 $SIG{q(__WARN__)} = sub { print $warn; $warn .= join("",@_) };