Perl lint