Select Code to Download

$ perlcritic -1 critic
Code is not tidy at line 1, column 1.  See page 33 of PBP.  (Severity:
+ 1)
...
Missing Perl version at line 1, column 1.  Add "use 5.006" or similar.
+  (Severity: 1)
No package-scoped "$VERSION" variable found at line 1, column 1.  See 
+page 404 of PBP.  (Severity: 2)
Return value of flagged function ignored - print at line 11, column 1.
+  See pages 208,278 of PBP.  (Severity: 1)

my $critic = Perl::Critic->new(-severity=>1);