Perlcritic --harsh fixes.