in reply to Avoiding Globals with OO Perl

Have you seen perl critc?

http://perlcritic.com/