Branch Coverage

lib/Graph/Easy/Group.pm
Criterion Covered Total %
branch 74 100 74.0


line true false branch
35 0 79 unless ($k =~ /^(graph|name)\z/)
57 0 13 wantarray ? :
65 0 8 wantarray ? :
74 0 5 wantarray ? :
85 5 3 if $level >= $max_level
89 2 4 if scalar keys %{$$g{'groups'};} > 0
102 2 34 if ($name eq 'nodeclass')
129 1 143 unless (ref $n and $n->isa('Graph::Easy::Node'))
131 0 1 unless (ref $$self{'graph'})
140 3 141 if exists $$self{'att'}{'nodeclass'}
155 1 142 unless $$n{'graph'} and $$self{'graph'} and $$n{'graph'} == $$self{'graph'}
166 0 128 unless (ref $n and $n->isa('Graph::Easy::Node'))
168 0 0 unless (ref $$self{'graph'})
174 3 125 if $n->isa('Graph::Easy::Edge')
175 8 117 if $n->isa('Graph::Easy::Group')
181 0 117 if $cl ne ''
196 1 115 unless $$n{'graph'} and $$self{'graph'} and $$n{'graph'} == $$self{'graph'}
209 0 2 if ($n->isa('Graph::Easy::Group'))
217 2 0 if ($n->isa('Graph::Easy::Node'))
223 0 0 if $$e{'from'} == $n or $$e{'to'} == $n
243 2 0 if $$e{'from'} == $n or $$e{'to'} == $n
257 0 2 unless (ref $n or ref $$self{'graph'})
261 0 18 if $n->isa('Graph::Easy::Group')
264 2 16 unless ref $n
285 0 15 unless $$n{'graph'} and $$self{'graph'} and $$n{'graph'} == $$self{'graph'}
312 0 66 unless (ref $e and $e->isa('Graph::Easy::Edge'))
320 0 66 if $edge_class ne ''
327 62 4 unless defined $$e{'group'} and $$e{'group'} == $self
338 0 2 unless defined $g
352 0 1 unless defined $g
357 1 0 unless defined $edge
371 1 8 unless ref $group
374 1 8 unless ref $group
448 2 40 if $loc eq 'bottom'
455 733 180 unless $$c{'cell_class'} =~ /$match/
457 143 37 if (defined $lc)
459 113 30 if ($align eq 'left') { }
18 12 elsif ($align eq 'center') { }
12 0 elsif ($align eq 'right') { }
462 102 11 if $$lc{'x'} < $$c{'x'} or $$lc{'y'} < $$c{'y'}
467 0 18 if $$lc{'y'} < $$c{'y'}
472 0 12 if $$lc{'x'} > $$c{'x'} or $$lc{'y'} < $$c{'y'}
479 7 35 if (ref $lc and $align eq 'center')
485 132 39 if $$c{'y'} != $$lc{'y'}
486 9 30 if not defined $left or $left > $$c{'x'}
487 37 2 if not defined $right or $right < $$c{'x'}
494 132 39 if $$c{'y'} != $$lc{'y'}
497 18 21 if defined $min_dist and $dist > $min_dist
502 0 42 if $$self{'debug'}
505 37 5 if ref $lc