| line |
true |
false |
branch |
|
56
|
0 |
30 |
if ($name and $cat and $name eq $cat)
|
|
59
|
0 |
30 |
if (defined $train_no and not $train_no)
|
|
62
|
0 |
0 |
if (not defined $line_no and defined $product->{'prodCtx'}{'matchId'} and !defined($train_no) || $product->{'prodCtx'}{'matchId'} ne $train_no)
|
|
73
|
30 |
0 |
if (defined $product->{'oprX'})
|
|
74
|
30 |
0 |
if (my $opref = $opL[$product->{'oprX'}])
|
|
81
|
1 |
0 |
if ($msg->{'type'} eq 'REM' and defined $msg->{'remX'}) { }
|
|
|
0 |
0 |
elsif ($msg->{'type'} eq 'HIM' and defined $msg->{'himX'}) { }
|
|
116
|
1138 |
418 |
unless (defined $timestr)
|
|
129
|
0 |
389 |
$sched_arr && $rt_arr ? :
|
|
134
|
29 |
360 |
$sched_dep && $rt_dep ? :
|
|
176
|
30 |
0 |
if ($journey->{'stbStop'})
|
|
177
|
0 |
30 |
if ($hafas->{'arrivals'}) { }
|
|
204
|
30 |
0 |
if ($journey->{'stbStop'}) { }
|
|
205
|
0 |
30 |
if ($hafas->{'arrivals'}) { }
|
|
220
|
30 |
0 |
if ($journey->{'stbStop'})
|
|
228
|
0 |
30 |
$hafas->{'arrivals'} ? :
|
|
230
|
0 |
30 |
$hafas->{'arrivals'} ? :
|
|
233
|
1 |
59 |
unless (defined $timestr)
|
|
249
|
29 |
1 |
$datetime_r ? :
|
|
259
|
2 |
28 |
if ($ref->{'delay'}) { }
|
|
271
|
0 |
30 |
if (%tco)
|
|
275
|
0 |
30 |
if ($opt{'polyline'})
|
|
288
|
0 |
477 |
if (length $timestr == 8) { }
|
|
313
|
0 |
3 |
if (defined $self->{'rt_platform'} and defined $self->{'sched_platform'})
|
|
314
|
0 |
0 |
if ($self->{'rt_platform'} ne $self->{'sched_platform'})
|
|
319
|
0 |
3 |
if (defined $self->{'rt_platform'})
|
|
329
|
0 |
0 |
if ($self->{'messages'})
|
|
338
|
0 |
0 |
if ($self->{'polyline'})
|
|
347
|
0 |
0 |
if ($self->{'route'})
|
|
348
|
0 |
0 |
if ($self->{'route'}[0] and $self->{'route'}[0]{'extra'})
|
|
369
|
0 |
0 |
if ($stop->{'name'} =~ / HB $ | hl\.n\. $ | Hbf | Hauptbahnhof | Bf | Bahnhof | Centraal | Flughafen /ux)
|
|
378
|
0 |
0 |
if (@via_main and $via_main[-1]{'name'} eq $last_stop->{'name'})
|
|
381
|
0 |
0 |
if (@via and $via[-1]{'name'} eq $last_stop->{'name'})
|
|
385
|
0 |
0 |
if (@via_main and @via and $via[0]{'name'} eq $via_main[0]{'name'})
|
|
389
|
0 |
0 |
if (@via < $max_parts) { }
|
|
393
|
0 |
0 |
if (@via_main >= $max_parts) { }
|
|
402
|
0 |
0 |
if (&any(sub {
|
|
425
|
0 |
0 |
if (ref $ret->{$k} eq "DateTime")
|