Branch Coverage

blib/lib/String/Copyright.pm
Criterion Covered Total %
branch 26 38 68.4


line true false branch
11 7 0 $@ ? :
173 0 7 if $CAN_RE2
190 0 183 unless 1 + @_ == grep({defined $_;} $copyright, @_)
193 0 183 if (not @_ and ref $copyright eq "String::Copyright")
205 24 242 if ($globals->{'threshold_before'} or $globals->{'threshold'})
210 2 22 if not @block || length $owners and ++$skipped >= ($globals->{'threshold_before'} || $globals->{'threshold'})
212 14 250 if ($globals->{'threshold_after'} or $globals->{'threshold'})
220 2 10 if @block and not length $owners and ++$skipped >= 1 + ($globals->{'threshold_after'} || $globals->{'threshold'})
222 142 120 unless length $owners
227 47 73 if (@span)
234 59 15 if (not $y2) { }
1 14 elsif ($y1 > $y2) { }
247 30 21 $_->[0] == $_->[1] ? :
250 114 6 if ($owners)
268 174 9 $globals->{'format'} ? :
278 0 0 if defined $_
0 0 unless 1 + @_ == grep({length $_ if defined $_;} @data)
281 0 0 if (not @_ and ref $self eq "String::Copyright")
287 0 0 unless @_ == grep({ref $_ eq "ARRAY";} @data)