File: zz_perlcritic.t

package info (click to toggle)
libxml-treebuilder-perl 5.4-3
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 124 kB
  • sloc: perl: 576; xml: 11; makefile: 2
file content (22 lines) | stat: -r--r--r-- 460 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
#!perl -T

use Test::More;

eval "use Test::Perl::Critic";

if ($@) {
    Test::More::plan( skip_all =>
            "Test::Perl::Critic required for testing PBP compliance" );
}
else {
    Test::Perl::Critic->import(
        -verbose  => 8,
        -severity => 5,
## This check fails to detect a package is modifying
## objects of it's own class when passing objects in an array
        -exclude => ['ProhibitAccessOfPrivateData']
    );
}

all_critic_ok();