"Fixing" perlcritic