Branch Coverage

blib/lib/Data/DFA.pm
Criterion Covered Total %
branch 70 96 72.9


line true false branch
116 219 728 if (my $f = $nfa->isFinal($state))
121 71 81 @final ? :
133 3113 0 if (my $r = $nfaSymbolTransitions->{$nfaState}{$symbol})
138 229 267 if (keys %$reach)
140 114 115 unless ($dfa->{$newSuperStateName})
181 245 98 unless exists $rename{$s}
215 10 2 if (@states == 1) { }
223 0 5 if -e $logFile and not @multiple
225 2 3 @multiple ? :
234 0 126 ref $f ? :
247 50 2 if (my(@s) = sort(keys %$transitions)) { }
251 21 29 $Final ? :
261 2 0 $Final ? :
266 15 0 if (@out)
268 9 6 $title ? :
276 0 15 if -e $logFile
324 99 122 $s->final ? :
331 23 168 if (@d)
340 22 38 if (keys %m) { }
345 33 62 if (defined $m{$s})
354 22 16 $deleted ? :
374 84 76 unless $checked{$t}++
379 0 122 unless ($reachable{$s})
384 0 38 $deleted ? :
411 17 34 if (defined $pumped{$state}) { }
413 17 0 if @pump
429 20 31 if (@path and $dfa->{$state}->final)
432 34 17 if (not defined $visited{$state})
530 4 0 if (substr($r, 0, length $s) eq $s and substr($r, -1, 1) eq ')')
545 10 2 if @c == 1
550 26 8 if @_ == 1
576 3 0 if $r eq '*'
577 0 0 if $r eq '+'
578 0 0 if $r eq '?'
608 0 3 if $@
624 9 27 unless @$B
629 18 30 if $a eq $b and __SUB__->([@a], [@b])
638 0 0 unless exists $paths->{$p}
640 0 0 unless exists $paths->{$q}
641 0 0 if $p ne $q and &subArray($paths->{$p}, $paths->{$q})
748 197 33 if (defined $nextState) { }
749 6 191 if $observer
761 31 2 if (scalar @next > 0) { }
793 0 227 if $@ and not $@ =~ /Already processed/
794 32 195 if $@
2288 0 1 if eval "eof(${p}::DATA)"
2290 0 1 if $@
2292 0 1 if $@