| blib/lib/Graph/Traverse.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 28 | 33 | 84.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 38 | 1 | 12 | 0 | defined $opts && $opts->{'weights'} |
| 39 | 1 | 0 | 12 | defined $opts && $opts->{'hash'} |
| 92 | 73 | 17 | 3 | defined $max_weight and $newvalue > $max_weight |
| 108 | 66 | 0 | 13 | defined $weight{$s} and $newvalue < $weight{$s} |
| line | l | !l | condition |
|---|---|---|---|
| 46 | 2 | 10 | $opts->{'attribute'} // 'weight' |
| 49 | 4 | 8 | $opts->{'default'} // 1 |
| 53 | 2 | 11 | (defined $opts ? $opts->{'next'} : undef) // 'successors' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 73 | 13 | 0 | 7 | $self->get_vertex_attribute($s, $attr) // $incr |
| 78 | 10 | 4 | 59 | $self->get_edge_attribute($t, $s, $attr) // $self->get_edge_attribute($s, $t, $attr) |
| 14 | 59 | 0 | ($self->get_edge_attribute($t, $s, $attr) // $self->get_edge_attribute($s, $t, $attr)) // $incr | |
| 104 | 66 | 13 | 11 | not defined $path{$s} or $newvalue < $weight{$s} |
| 134 | 63 | 13 | 11 | not defined $$ret{$v->{'vertex'}} or $$ret{$v->{'vertex'}}{'weight'} > $v->{'weight'} |