Switch to qw<>

[perl/modules/Variable-Magic.git] / t / 23-clear.t

diff --git a/t/23-clear.t b/t/23-clear.t
index a3aad82ded0d9e07f14c90ac9ab46600e07163ab..3af5545755e7e3e1585a10c04c4a280be1b7197e 100644 (file)
--- a/t/23-clear.t
+++ b/t/23-clear.t
@@ -5,7 +5,7 @@ use warnings;
 
 use Test::More tests => (2 * 5 + 2) + (2 * 2 + 1) + 1;
 
-use Variable::Magic qw/cast dispell/;
+use Variable::Magic qw<cast dispell>;
 
 use lib 't/lib';
 use Variable::Magic::TestWatcher;
@@ -13,7 +13,7 @@ use Variable::Magic::TestValue;
 
 my $wiz = init_watcher 'clear', 'clear';
 
-my @a = qw/a b c/;
+my @a = qw<a b c>;
 
 watch { cast @a, $wiz } { }, 'cast array';