Switch to qw<>

[perl/modules/Variable-Magic.git] / t / 22-len.t

diff --git a/t/22-len.t b/t/22-len.t
index 01a06dd932ccc8ae70f34f3c838ccd853f56c5dc..a35375fb21a1dcbcae9775d82b0273a34707dc03 100644 (file)
--- a/t/22-len.t
+++ b/t/22-len.t
@@ -5,7 +5,7 @@ use warnings;
 
 use Test::More tests => 39 + (2 * 2 + 1);
 
-use Variable::Magic qw/wizard cast dispell VMG_COMPAT_SCALAR_LENGTH_NOLEN/;
+use Variable::Magic qw<wizard cast dispell VMG_COMPAT_SCALAR_LENGTH_NOLEN>;
 
 use lib 't/lib';
 use Variable::Magic::TestValue;
@@ -17,7 +17,7 @@ my $d;
 my $wiz = wizard len => sub { $d = $_[2]; ++$c; return $n };
 is $c, 0, 'len: wizard() doesn\'t trigger magic';
 
-my @a = qw/a b c/;
+my @a = qw<a b c>;
 
 $c = 0;
 cast @a, $wiz;