Specifically look at
Perl::Critic::Policy::Variables::ProhibitReusedNames - Do not reuse a variable name in a lexical scope
Perl::Critic::Policy::Variables::ProhibitUnusedVariables - Don't ask for storage you don't need.

And Perl::Critic::Policy is xpaths