Branch Coverage

blib/lib/TAP/Parser/Scheduler.pm
Criterion Covered Total %
branch 53 64 82.8


line true false branch
132 0 89 if @_ % 2
138 0 89 if keys %args
167 107 341 'ARRAY' eq ref $_ ? :
172 4 85 if @tests
179 0 139 unless 'HASH' eq ref $rule
183 0 139 unless @type == 1
199 50 140 'HASH' eq ref $_ ? :
18 121 'ARRAY' eq ref $val ? :
212 82 236 if ($glob =~ /\G\*\*/cg) { }
54 182 elsif ($glob =~ /\G\*/cg) { }
1 181 elsif ($glob =~ /\G\?/cg) { }
15 166 elsif ($glob =~ /\G\{/cg) { }
18 148 elsif ($nesting and $glob =~ /\G,/cg) { }
15 133 elsif ($nesting and $glob =~ /\G\}/cg) { }
3 130 elsif ($glob =~ /\G(\\.)/cg) { }
8 122 elsif ($glob =~ /\G([\},])/cg) { }
260 160 158 if pos $glob == length $glob
272 414 3153 if ($tests->[$ti]->filename =~ /$pattern/)
298 0 712 unless defined $rule
299 448 264 unless 'ARRAY' eq ref $rule
300 531 50 defined $_ ? :
315 448 153 if (@jobs)
321 61 92 if $self->{'count'}
328 10373 13293 unless 'ARRAY' eq ref $ar
330 13226 50 if _not_empty($_)
347 10373 135 if (@$seq) { }
348 6991 3382 if (defined $seq->[0])
349 6543 448 if ('ARRAY' eq ref $seq->[0]) { }
368 309 3257 if (my(@jobs) = $self->_find_next_job($seq->[0]))
432 0 0 if (not defined $rule) { }
0 0 elsif ('ARRAY' eq ref $rule) { }
436 0 0 unless @$rule