Branch Coverage

blib/lib/TAP/Spec/Parser.pm
Criterion Covered Total %
branch 30 44 68.1


line true false branch
30 0 5 unless open my $fh, '<', \$string
57 0 0 unless open my $fh, '<', $file
230 0 189 unless defined $token
233 127 62 unless $$input =~ /$rule/
238 32 30 if (defined(my $val = $$token[1])) { }
8 22 elsif ($#- > 0) { }
239 15 17 if (ref $val eq 'CODE') { }
250 8 54 if ($token_name eq 'Safe_String')
251 0 8 if ($self->exhaustive_strings) { }
0 8 elsif ($matched_value =~ /(.*) $/) { }
278 55 35 if (@$expected_tokens)
287 1 89 unless ($ok)
311 1 15 if $$line_token[0] eq 'Junk_Line'
312 1 14 unless (defined $rec->read(@$line_token))
381 0 4 if defined $_[1]
382 1 3 if defined $_[2]
389 0 4 if defined $_[1]
442 8 0 if defined $_[2]
443 0 8 if defined $_[3]
444 0 8 if defined $_[4] and defined $_[4][0]
445 0 8 if defined $_[4] and defined $_[4][1]
457 0 0 if defined $_[1]