Condition Coverage

blib/lib/Test/Strict.pm
Criterion Covered Total %
condition 42 70 60.0


and 3 conditions

line !l l&&!r l&&r condition
132 43 21 2 -d $File::Find::name and $_ eq 'CVS' || $_ eq '.svn' || $_ eq '.git' || $File::Find::name =~ m[(?:^|[\\/])blib[\\/]libdoc$] || $File::Find::name =~ m[(?:^|[\\/])blib[\\/]man\d$]
141 21 0 43 -f $File::Find::name and -r _
174 0 0 20 -f $file and -r _
244 18 3 2 /\buse\s+(5\.\d+)/ and $1 >= 5.012
247 20 0 1 /\buse\s+v5\.(\d+)/ and $1 >= 12
372 7 1 3 not $is_script and $is_module
8 3 0 not $is_script and $is_module and not $CAN_USE_WARNINGS
390 2 4 7 $. == 1 and $is_script
6 1 6 $. == 1 and $is_script and $_ =~ /$PERL_PATTERN/
479 0 0 0 $IS_WINDOWS and not -d $DEVEL_COVER_DB
515 11 23 0 defined $first and $first =~ /$PERL_PATTERN/
541 607 0 2 -e $candidate and -f _
607 0 2 -e $candidate and -f _ and -r _
556 0 0 0 -f $path_cover and -r _

or 2 conditions

line l !l condition
153 2 0 $TEST_SKIP || []
184 20 0 join($Config::Config{'path_sep'}, @INC) || ''
191 2 14 _taint_switch($file) || ''
470 0 0 ('File::Spec'->splitpath($0))[1] || '.'
553 11 1 $_ || '.'

or 3 conditions

line l !l&&r !l&&!r condition
132 0 2 21 $_ eq 'CVS' || $_ eq '.svn' || $_ eq '.git' || $File::Find::name =~ m[(?:^|[\\/])blib[\\/]libdoc$] || $File::Find::name =~ m[(?:^|[\\/])blib[\\/]man\d$]
171 2 18 0 shift() || "Syntax check $file"
220 5 21 0 shift() || "use strict $file"
367 7 4 0 shift() || "use warnings $file"
469 0 0 0 shift() || $COVERAGE_THRESHOLD
472 0 0 0 /$0$/o || $0 =~ /$_$/