Perl::Critic severity >= 4 OK