Fixed perlcritic warnings.