Branch Coverage

blib/lib/Graph/Easy/Marpa/Parser.pm
Criterion Covered Total %
branch 5 94 5.3


line true false branch
148 0 0 if ($inside_name) { }
0 0 elsif ($inside_value) { }
150 0 0 if $char =~ /\s/
152 0 0 if ($char eq ':') { }
0 0 elsif ($char =~ /[a-zA-Z_]/) { }
171 0 0 if ($char eq $quote) { }
0 0 elsif ($char eq ';' and $quote eq '') { }
177 0 0 if ($char =~ /[\"\']/) { }
179 0 0 if ($previous_char ne '\\')
186 0 0 if (substr($value, 0, 2) eq '<<' and $i > 0 and $char[$i - 1] eq '>') { }
0 0 elsif (substr($value, 0, 1) eq '<' and substr($value, 1, 1) ne '<' and $previous_char ne '\\') { }
200 0 0 if ($previous_char eq '\\') { }
224 0 0 if $char =~ /\s/
233 0 0 if ($char =~ /[\"\'<]/)
235 0 0 $char eq '<' ? :
244 0 0 if (length $key)
286 85 0 unless (defined $self->logger)
432 0 0 unless ($class_name =~ /^(?:$reserved_class_name)(?:\.[a-zA-Z_]+)?$/)
483 0 0 if ($quote) { }
488 0 0 if $char =~ /[\]\"\'>]/ and $i > 0 and $char[$i - 1] eq '\\'
492 0 0 if ($char eq $quote)
494 0 0 if ($quote eq '>')
496 0 0 if not $angle or $char[$i - 1] eq '>'
511 0 0 if $i > 0 and $char[$i - 1] eq '\\'
516 0 0 if ($char =~ /[\"\']/)
527 0 0 if ($target =~ /}/ and $char =~ /
530 0 0 if $i < $#char and $char[$i + 1] eq '<'
535 0 0 if $char =~ /$target/
550 0 0 if length $$item{'value'} > 0
567 0 0 unless open OUT, '>', $file_name
602 75 0 unless open INX, $self->input_file
619 0 0 if $self->logger
644 0 0 if ($node_name eq '')
692 0 0 if ($event_name eq 'start_attributes') { }
0 0 elsif ($event_name eq 'start_node') { }
0 0 elsif ($event_name eq 'directed_edge') { }
0 0 elsif ($event_name eq 'undirected_edge') { }
0 0 elsif ($event_name eq 'class_lexeme') { }
0 0 elsif ($event_name eq 'push_subgraph') { }
0 0 elsif ($event_name eq 'pop_subgraph') { }
747 0 0 if $do_lexeme_read
788 0 0 unless ($subgraph_name =~ /^$subgraph_name_regexp/)
852 0 85 if ($self->description) { }
75 10 elsif ($self->input_file) { }
871 0 0 if (defined $self->process) { }
874 0 0 if $self->report_tokens
878 0 0 if $file_name