Switch to qw<>

[perl/modules/Regexp-Wildcards.git] / t / 23-groups.t

diff --git a/t/23-groups.t b/t/23-groups.t
index 9b36dc2902f176bc391dfae24c3ee6b86d621020..30a1f1b6539c21ca5e1ea91a73a4a548cfd21427 100644 (file)
--- a/t/23-groups.t
+++ b/t/23-groups.t
@@ -7,7 +7,7 @@ use Test::More tests => 6;
 
 use Regexp::Wildcards;
 
-my $rw = Regexp::Wildcards->new(do => [ qw/jokers brackets groups/ ]);
+my $rw = Regexp::Wildcards->new(do => [ qw<jokers brackets groups> ]);
 
 is($rw->convert('a(?)b'), 'a(.)b',                'groups: single');
 is($rw->convert('a(*)b'), 'a(.*)b',               'groups: any');