blib/lib/Perl/Critic/Policy/Dynamic/NoIndirect.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 18 | 72.2 |
line | true | false | branch |
---|---|---|---|
47 | 0 | 28 | if ($doc->isa('PPI::Document::File')) { } |
50 | 0 | 0 | unless (open my $fh, '<', $file) |
77 | 0 | 28 | if (my $err = $@) |
85 | 25 | 3 | if (@errs) |
96 | 0 | 532 | unless $pos |
99 | 43 | 489 | if (my $errs = $errs_tags{$tag}) |
101 | 39 | 4 | unless @$errs |
102 | 25 | 18 | unless %errs_tags |
111 | 9 | 34 | $obj =~ /^\s*\{/ ? : |