More self compliance

diff --git a/lib/Perl/Critic/Policy/CodeLayout/ProhibitParensWithBuiltins.pm b/lib/Perl/Critic/Policy/CodeLayout/ProhibitParensWithBuiltins.pm
index 1c97197..2ff8bdc 100644 (file)
--- a/lib/Perl/Critic/Policy/CodeLayout/ProhibitParensWithBuiltins.pm
+++ b/lib/Perl/Critic/Policy/CodeLayout/ProhibitParensWithBuiltins.pm
@@ -171,7 +171,7 @@ __END__
 
 =pod
 
-=for stopwords disambiguates
+=for stopwords disambiguates builtins
 
 =head1 NAME
 

diff --git a/lib/Perl/Critic/Utils.pm b/lib/Perl/Critic/Utils.pm
index 1fb7df2..66ee713 100644 (file)
--- a/lib/Perl/Critic/Utils.pm
+++ b/lib/Perl/Critic/Utils.pm
@@ -15,6 +15,8 @@ use strict;
 use warnings;
 use Readonly;
 
+use Carp qw( confess );
+use English qw(-no_match_vars);
 use File::Spec qw();
 use Scalar::Util qw( blessed );
 use B::Keywords qw();
@@ -249,7 +251,7 @@ sub hashify {  ## no critic (ArgUnpacking)
 
 sub interpolate {
     my ( $literal ) = @_;
-    return eval "\"$literal\"";  ## no critic (StringyEval);
+    return eval "\"$literal\"" or confess $EVAL_ERROR;  ## no critic (StringyEval);
 }
 
 #-----------------------------------------------------------------------------
@@ -1684,6 +1686,8 @@ function call whose return value is not checked.
 
 =item C<$EMPTY>
 
+=item C<$EQUAL>
+
 =item C<$SPACE>
 
 =item C<$SLASH>

diff --git a/t/16_roundtrip_defaults.t b/t/16_roundtrip_defaults.t
index ba15384..016637c 100644 (file)
--- a/t/16_roundtrip_defaults.t
+++ b/t/16_roundtrip_defaults.t
@@ -26,7 +26,7 @@ our $VERSION = '1.093_01';
 
 #-----------------------------------------------------------------------------
 
-eval 'use Test::Deep'; ## no critic (
+eval 'use Test::Deep'; ## no critic (StringyEval)
 plan( skip_all => 'Test::Deep requried to test round-trip of default values')
     if $EVAL_ERROR;