Fixed to satisfy perlcritic warnings.