diff --git a/doc/lib/BackRestDoc/Common/DocManifest.pm b/doc/lib/BackRestDoc/Common/DocManifest.pm index 7f6484e88..e085bb87b 100644 --- a/doc/lib/BackRestDoc/Common/DocManifest.pm +++ b/doc/lib/BackRestDoc/Common/DocManifest.pm @@ -276,7 +276,8 @@ sub variableListParse if ($oVariable->paramTest('eval', 'y')) { - $strValue = eval $strValue; + # In this case we really do want to evaluate the contents of strValue and not treat it as a literal. + $strValue = eval($strValue); ## no critic (BuiltinFunctions::ProhibitStringyEval) if ($@) { diff --git a/test/lint/perlcritic.policy b/test/lint/perlcritic.policy index af3879c1c..c6620d363 100644 --- a/test/lint/perlcritic.policy +++ b/test/lint/perlcritic.policy @@ -43,9 +43,6 @@ severity = 5 # Provisional Exceptions for Test & Documentation Code #----------------------------------------------------------------------------------------------------------------------------------- -# S5 - Required to make eval in DocManifest.pm work. Would prefer a line exception for this but can't get it working yet. -[-BuiltinFunctions::ProhibitStringyEval] - # S2 - Requires complete POD sections but these are being removed anyway in favor of Config.pm. [-Documentation::RequirePodSections] [-Documentation::RequirePodAtEnd]