Branch Coverage

lib/Perl/Critic/Policy/CodeLayout/ProhibitLongLines.pm
Criterion Covered Total %
branch 23 26 88.4


line true false branch
46 1 41 if defined $override and $override eq "ignore"
57 32 64 if ($length > $max_length)
58 4 28 if &any(sub {
66 6 22 unless ($line_token)
83 39 8 unless defined $filename and length $filename
85 1 7 unless defined $attr and length $attr
89 0 7 unless open my $fh, "-|", "git", "-C", $dir, "check-attr", $attr, "--", $filename
92 0 7 unless close $fh
95 0 7 unless defined $output and $output =~ /: \Q$attr\E: (.+)$/mu
98 2 5 if $value eq "ignore"
99 3 2 if $value =~ /^\d+$/u
108 44 398 unless $elem->isa("PPI::Token")
111 164 234 if (defined $line and $line == $target_line)