Updating based on perlcritic