Help for this page
use Perl::Critic; ... my $critic = Perl::Critic->new(); my @violations = $critic->critique( $file ); print @violations;
criticize mytest.pl
Variable declared in conditional statement at line 9, column 1. Declar +e variables outside of the condition.