Fixed PerlCritic issues