| line |
true |
false |
branch |
|
24
|
0 |
0 |
if ($opt{'timeout'} <= 0) |
|
34
|
0 |
0 |
unless ($opt{'name'}) |
|
37
|
0 |
0 |
if ($opt{'type'} and not $opt{'type'} ~~ ['stop', 'stopID', 'address', 'poi']) |
|
41
|
0 |
0 |
unless ($opt{'efa_url'}) |
|
48
|
0 |
0 |
if ($opt{'time'} and $opt{'time'} =~ / ^ (? \d\d? ) : (? \d\d ) $ /x) { } |
|
|
0 |
0 |
elsif ($opt{'time'}) { } |
|
57
|
0 |
0 |
if ($opt{'date'} and $opt{'date'} =~ / ^ (? \d\d? ) [.] (? \d\d? ) [.]
(? \d{4} )? $ /x) { } |
|
|
0 |
0 |
elsif ($opt{'date'}) { } |
|
63
|
0 |
0 |
if ($+{'year'}) { } |
|
107
|
0 |
0 |
$opt{'proximity_search'} ? : |
|
109
|
0 |
0 |
if ($opt{'place'}) |
|
115
|
0 |
0 |
if ($opt{'full_routes'}) |
|
127
|
0 |
0 |
if ($response->is_error) |
|
132
|
0 |
0 |
if ($opt{'efa_encoding'}) { } |
|
139
|
0 |
0 |
unless ($self->{'xml'}) |
|
150
|
0 |
0 |
if ($self->{'developer_mode'}) |
|
182
|
1 |
0 |
if ($self->{'name_candidates'}) |
|
191
|
0 |
1 |
if ($self->{'place_candidates'}) |
|
200
|
0 |
49 |
if ($e->getAttribute('day') == -1) |
|
214
|
0 |
49 |
if ($e->getAttribute('minute') == -1) |
|
241
|
0 |
1 |
unless ($e_place and $e_name) |
|
251
|
0 |
1 |
if ($s_place eq 'list') |
|
257
|
1 |
0 |
if ($s_name eq 'list') |
|
264
|
0 |
0 |
if ($s_place eq 'notidentified') |
|
268
|
0 |
0 |
if ($s_name eq 'notidentified') |
|
272
|
0 |
0 |
if (@e_mesg) |
|
283
|
0 |
2 |
unless ($self->{'tree'}) |
|
302
|
1 |
2 |
if ($self->{'lines'}) |
|
306
|
0 |
2 |
unless ($self->{'tree'}) |
|
323
|
0 |
54 |
unless ($e_info) |
|
334
|
52 |
2 |
$e_route ? : |
|
335
|
54 |
0 |
$e_oper ? : |
|
396
|
0 |
2 |
if ($self->{'results'}) |
|
400
|
0 |
2 |
unless ($self->{'tree'}) |
|
430
|
0 |
40 |
unless ($e_date and $e_time and $e_line) |
|
438
|
9 |
31 |
$e_rdate ? : |
|
439
|
9 |
31 |
$e_rtime ? : |
|
459
|
0 |
40 |
if ($self->{'want_full_routes'}) |
|
481
|
0 |
40 |
if ($platform_name and $platform_name =~ / ^ Gleis /ox and not $platform && $platform =~ s/ ^ \# //ox) |
|
487
|
40 |
0 |
if ($platform_name and $platform_name =~ / ^ (Gleis | Bstg[.])/ox) { } |
|
|
0 |
0 |
elsif ($platform_name and not $platform) { } |