clean up some more code to satisfy the current perlcritic configuration