Branch Coverage

blib/lib/Travel/Status/DE/IRIS/Result.pm
Criterion Covered Total %
branch 68 100 68.0


line true false branch
183 24 1116 if ($opt{'transfer'})
194 0 1140 unless (defined $ar or defined $dp)
218 38 1102 $ref->{'route_end'} ? :
219 1140 0 $ref->{'route_post'} ? :
242 0 27180 if ($stop =~ /^Betriebsstelle nicht bekannt (\d+)$/u)
243 0 0 if ($fixup{$1})
253 4655 356 if (defined $string)
265 0 0 unless ($sublist and @{$sublist;})
302 54 706 if ($attrib{'status'} and $attrib{'status'} eq 'c') { }
0 706 elsif ($attrib{'status'} and $attrib{'status'} eq 'a') { }
314 0 760 if ($attrib{'arrival_hidden'})
320 184 576 if ($attrib{'plan_arrival_ts'})
325 648 112 if ($attrib{'arrival_ts'}) { }
328 640 8 unless ($self->{'arrival_is_cancelled'})
340 14 746 if ($attrib{'platform'}) { }
347 190 570 if (defined $attrib{'route_pre'}) { }
350 144 46 if (@{$self->{'route_pre'};})
360 184 576 if ($attrib{'sched_route_pre'})
373 53 633 if ($attrib{'status'} and $attrib{'status'} eq 'c') { }
0 633 elsif ($attrib{'status'} and $attrib{'status'} eq 'a') { }
385 0 686 if ($attrib{'departure_hidden'})
391 176 510 if ($attrib{'plan_departure_ts'})
396 572 114 if ($attrib{'departure_ts'}) { }
399 564 8 unless ($self->{'departure_is_cancelled'})
411 7 679 if ($attrib{'platform'}) { }
418 182 504 if (defined $attrib{'route_post'}) { }
421 137 45 if (@{$self->{'route_post'};})
431 176 510 if ($attrib{'sched_route_post'})
551 0 0 if ($self->{'arrival_is_additional'} and $self->{'departure_is_additional'})
554 0 0 if ($self->{'arrival_is_additional'} and not defined $self->{'departure_is_additional'})
559 0 0 if (not defined $self->{'arrival_is_additional'} and $self->{'departure_is_additional'})
570 1 0 if ($self->{'arrival_is_cancelled'} and $self->{'departure_is_cancelled'})
573 0 1 if ($self->{'arrival_is_cancelled'} and not defined $self->{'departure_is_cancelled'})
578 0 0 if (not defined $self->{'arrival_is_cancelled'} and $self->{'departure_is_cancelled'})
643 0 2 if (my(@superseded) = $self->superseded_messages($id))
660 2 2 if ($self->{'arrival_wings'})
669 4 2 if ($self->{'departure_wings'})
678 0 0 if ($self->{'replaced_by'})
687 0 0 if ($self->{'replacement_for'})
702 0 1 if (my(@superseded) = $self->superseded_messages($msg->[2]))
710 1 0 if ($msg->[2] != 84 and $msg->[2] != 88 and $msg->[2] != 89)
804 9 7 if ($stop =~ / HB $ | hl\.n\. $ | Hbf | Centraal | Flughafen /ux)
809 4 0 $self->{'route_post_incomplete'} ? :
811 2 2 if (@via_main and $via_main[-1] eq $last_stop)
814 3 1 if (@via and $via[-1] eq $last_stop)
818 1 1 if (@via_main and @via and $via[0] eq $via_main[0])
822 2 2 if (@via < $max_parts) { }
826 1 1 if (@via_main >= $max_parts) { }
835 0 4 if ($stop ~~ \@via_show or $stop eq $last_stop)
890 0 0 if (defined $copy{$datetime_key})