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 184 unless 1 + @_ == grep({defined $_;} $copyright, @_)
193 0 184 if (not @_ and ref $copyright eq "String::Copyright")
205 24 243 if ($globals->{'threshold_before'} or $globals->{'threshold'})
213 2 22 if not @block || length $owners and ++$skipped >= ($globals->{'threshold_before'} || $globals->{'threshold'})
215 14 251 if ($globals->{'threshold_after'} or $globals->{'threshold'})
225 2 10 if @block and not length $owners and ++$skipped >= 1 + ($globals->{'threshold_after'} || $globals->{'threshold'})
227 143 120 unless length $owners
232 47 73 if (@span)
239 59 15 if (not $y2) { }
1 14 elsif ($y1 > $y2) { }
252 30 21 $_->[0] == $_->[1] ? :
255 114 6 if ($owners)
273 175 9 $globals->{'format'} ? :
283 0 0 if defined $_
0 0 unless 1 + @_ == grep({length $_ if defined $_;} @data)
286 0 0 if (not @_ and ref $self eq "String::Copyright")
292 0 0 unless @_ == grep({ref $_ eq "ARRAY";} @data)