Branch Coverage

blib/lib/Map/Metro/Graph.pm
Criterion Covered Total %
branch 49 78 62.8


line true false branch
212 4800 0 if ($] >= 5.016) { }
238 20 176 if not length $row or $row =~ /^[ \t]*#/
240 12 164 if ($row =~ /^--(\w+)/ and &any(sub { $_ eq $1; } , 'stations', 'transfers', 'lines', 'segments'))
245 76 0 $context eq 'segments' ? :
8 76 $context eq 'lines' ? :
0 84 $context eq 'transfers' ? :
80 84 $context eq 'stations' ? :
391 81 152 exists $args{'check'} ? :
394 152 81 if &Station()->check($station)
396 1 80 if ($check)
398 0 1 if &Station()->check($station)
402 0 20 if (&any(sub { nocase($station_name) eq nocase($_); } , $current_station->all_alternative_names))
406 0 1 if &Station()->check($station)
410 0 20 if (&any(sub { nocase($station_name) eq nocase($_); } , $current_station->all_search_names))
414 0 1 if &Station()->check($station)
438 2496 2424 if $_->line->id eq $line_id
458 8 5 if $_->origin_line_station->line_station_id == $first_ls->line_station_id
474 0 0 exists $args{'keys'} ? :
483 0 0 if scalar @$keys and &none(sub { $key eq $_; } , @$keys)
492 0 4 unless ($self->has_stations and $self->has_lines and $self->has_segments)
538 96 0 unless $segment->is_one_way
541 96 0 unless $segment->is_one_way
558 48 0 $self->has_override_line_change_weight ? :
605 0 2 if &Station()->check($place)
608 2 0 if (&Int()->check($place)) { }
634 1 0 if ($self->has_routings)
635 0 0 if $_->origin_station->id == $origin_station->id
636 0 1 if $existing_routing
654 0 1 $self->has_asps ? :
656 0 1 if ($origin->possible_on_same_line($dest) and not $origin->on_same_line($dest))
675 2 1 if ($index + 2 < scalar @$graphroute) { }
676 2 0 defined $next_next_line_station_id ? :
677 2 0 if defined $next_conn
684 2 1 if $prev_step
685 2 1 if $next_step
687 2 1 if defined $next_step
702 0 1 if $route->transfer_on_first_station
703 0 1 if $route->transfer_on_final_station
708 1 0 if $self->has_wanted_hook_plugins