Switch to qw<>

diff --git a/lib/Perl/Critic/Policy/Dynamic/NoIndirect.pm b/lib/Perl/Critic/Policy/Dynamic/NoIndirect.pm
index 624792ec1b688f3114415a926264b7ce1747cb0d..893398271f6093dbd0fc5eceb9d07236f680c6c9 100644 (file)
--- a/lib/Perl/Critic/Policy/Dynamic/NoIndirect.pm
+++ b/lib/Perl/Critic/Policy/Dynamic/NoIndirect.pm
@@ -26,12 +26,12 @@ Since it wraps around L<indirect>, it needs to compile the audited code and as s
 
 =cut
 
-use base qw/Perl::Critic::DynamicPolicy/;
+use base qw<Perl::Critic::DynamicPolicy>;
 
-use Perl::Critic::Utils qw/:severities/;
+use Perl::Critic::Utils qw<:severities>;
 
 sub default_severity { $SEVERITY_HIGH }
-sub default_themes   { qw/dynamic maintenance/ }
+sub default_themes   { qw<dynamic maintenance> }
 sub applies_to       { 'PPI::Document' }
 
 my $tag_obj = sub {

diff --git a/samples/check.pl b/samples/check.pl
index f444d9498febe9fcd13b71a8105e5133df3d9ee6..7f095329ad7caeee2238b245e08aef38f10ad5c2 100644 (file)
--- a/samples/check.pl
+++ b/samples/check.pl
@@ -5,7 +5,7 @@ use warnings;
 
 use blib;
 
-use Perl::Critic::TestUtils qw/pcritique_with_violations/;
+use Perl::Critic::TestUtils qw<pcritique_with_violations>;
 Perl::Critic::TestUtils::block_perlcriticrc();
 
 my $code = shift || exit;

diff --git a/t/10-basic.t b/t/10-basic.t
index 146c6a1390330f262f09457ef33f89b0ffc7c3d5..53629b08447ee7bab28c2b715bf2373b35e7f204 100644 (file)
--- a/t/10-basic.t
+++ b/t/10-basic.t
@@ -12,7 +12,7 @@ BEGIN {
 
 use Test::More tests => $tests + $subtests * $reports;
 
-use Perl::Critic::TestUtils qw/pcritique_with_violations/;
+use Perl::Critic::TestUtils qw<pcritique_with_violations>;
 
 Perl::Critic::TestUtils::block_perlcriticrc();