Branch Coverage

blib/lib/Graph/Easy/StateMachine.pm
Criterion Covered Total %
branch 25 38 65.7


line true false branch
15 0 4 unless @_
24 0 5 unless defined($current = shift @in_stack) and length $current
30 0 1 if substr($c, 0, 2) eq '::'
33 0 1 $seen{$c}++ ? :
65 17 2 unless $statename eq $BASE
70 21 22 unless $edge->from->name eq $statename
75 2 20 if ($from eq $BASE) { }
82 0 22 $to eq $BASE ? :
83 1 21 if $Transitions{$methodname}{$from}++
86 0 21 if ($edge->bidirectional)
88 0 0 if $Transitions{$edge->name or $from}{$to}++
91 0 0 if $to eq $BASE
100 2 16 if $statename eq $BASE
103 0 6 if $Transitions{$method}{$statename}
113 5 0 if not $Seen{$_}++
121 5 5 if $seen{$_}++
125 16 5 unless $sawnew
131 4 12 if @MoreIsas
148 0 3 unless eval join("\n", map({my $g = 'Graph::Easy'->new($_); $g->as_FSA('base', $caller);} @graphs), ';1')