fix perlcritic issues