Switch to qw<>

[perl/modules/Variable-Magic.git] / samples / copy.pl

diff --git a/samples/copy.pl b/samples/copy.pl
index 6a705f688e44e8e303bd9e5d501563c1632c273c..e24dc80fcf89ffc9303c68058fa19d05189f0b0d 100755 (executable)
--- a/samples/copy.pl
+++ b/samples/copy.pl
@@ -3,8 +3,8 @@
 use strict;
 use warnings;
 
-use lib qw{blib/arch blib/lib};
-use Variable::Magic qw/wizard cast/;
+use lib qw<blib/arch blib/lib>;
+use Variable::Magic qw<wizard cast>;
 use Tie::Hash;
 
 my $wiz = wizard copy => sub { print STDERR "COPY $_[2] => $_[3]\n" },