If your answer to "How is Perl::Critic to do this thing?" is "Magic", then I'd very much like to see your implementation.

Do what?

Giving the wrong answer sometimes is undesirable. Giving the wrong warning doubly so.

Gee, if only perlcritic had some way to differentiate levels of warnings ... no, it must always be 100% perfect