All the Perl that's Practical to Extract and Report
use Perl Log In
rjbs (4671)
(email not shown publicly)
http://rjbs.manxome.org/
AOL IM: RicardoJBSignes (Add Buddy, Send Message)
Yahoo! ID: RicardoSignes (Add User, Send Message)
I'm a Perl coder living in Bethlehem, PA and working Philadelphia. I'm a philosopher and theologan by training, but I was shocked to learn upon my graduation that these skills don't have many associated careers. Now I write code.
playing with ppi and perl critic
I've heard a lot about Perl::Critic, and it has always sounded neat. Chris Dolan gave a talk about it at YAPC, and I decided I should give it a go. I didn't get around to it until this week. I went through and installed a perl-critic.t in all my distributions, then started testing them. Nearly all the violations it found were in a few groups.
"Don't use stringy eval!" Ok, but I'm trying to load a module by name, and I don't want to use UNIVERSAL::require. I need to use stringy eval!
"Don't put any code before use strict!" Ok, that's reasonable. I'll just
move use strict to the very top of every file. "Now don't put any code
before the package declaration!" What? No, it doesn't matter! It's lexical
to the file!
The other things it caught were pretty reasonable, and I fixed them. I just
didn't like the idea of putting no critic comments at places where I wanted
to keep my code the same. When I looked at the code for policies, I was
surprised at how simple it was. PPI exposes a really reasonable DOM, and I was
able to code lots of fiddly little policy tweaks for my own use.
I have a few more policies I want to write, but so far I'm pretty happy with Perl::Critic and my own attempts to train its taste.
--Larry Wall in stab.c from the perl source code
Perl::Critic++ (Score:1)
One test checks the core modules. In my case, I set severity to 1, and then commented out policies in the rc that I don't agree with.
My second test file simply uses the RequireTestLabels and RequireRcsKeywords to make sure all of my test files at least meet those two requirements.
Other than being an anal retentive freakjob, my main goal is to have a set of policies and test coverage in place for Handel 1.0 before others start contributing to the codebase. Then I have
Perl::Critic's RequireExplicitPackage Policy (Score:1)
In file Foo.pm:
sub frobulator{ print shift; }
our $SHIZZLE = 42;
package Foo;
sub foo { return main::frobulator( @_ ) }
In file my_script.pl:
use Foo;
Foo::foo( $SHIZZLE );
Since $SHIZZLE and &frobulator are declared before the package statement in F