Branch Coverage

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


line true false branch
11 7 0 $@ ? :
174 0 7 if $CAN_RE2
191 0 185 unless 1 + @_ == grep({defined $_;} $copyright, @_)
194 0 185 if (not @_ and ref $copyright eq "String::Copyright")
206 24 244 if ($globals->{'threshold_before'} or $globals->{'threshold'})
214 2 22 if not @block || length $owners and ++$skipped >= ($globals->{'threshold_before'} || $globals->{'threshold'})
216 14 252 if ($globals->{'threshold_after'} or $globals->{'threshold'})
226 2 10 if @block and not length $owners and ++$skipped >= 1 + ($globals->{'threshold_after'} || $globals->{'threshold'})
228 143 121 unless length $owners
233 47 74 if (@span)
240 59 15 if (not $y2) { }
1 14 elsif ($y1 > $y2) { }
253 30 21 $_->[0] == $_->[1] ? :
256 115 6 if ($owners)
274 176 9 $globals->{'format'} ? :
284 0 0 if defined $_
0 0 unless 1 + @_ == grep({length $_ if defined $_;} @data)
287 0 0 if (not @_ and ref $self eq "String::Copyright")
293 0 0 unless @_ == grep({ref $_ eq "ARRAY";} @data)