% if ($origin and $destination) {
Fahrt
% if (stash('train_no')) {
<%= stash('train_no') %>
% }
von <%= $origin->{name} %>
nach <%= $destination->{name} %>
% if (my $next = stash('next_stop')) {
% if ($next->{type} eq 'present' and $next->{station}{dep} and $next->{station}{arr}) {
Aufenthalt in <%= $next->{station}{name} %>
an Gleis <%= $next->{station}{platform} %>
bis <%= $next->{station}{dep}->strftime('%H:%M') %>
% if ($next->{station}{dep_delay}) {
%= sprintf('(%+d)', $next->{station}{dep_delay})
% }
% }
% elsif ($next->{type} eq 'present' and $next->{station}{dep}) {
Abfahrt in <%= $next->{station}{name} %>
von Gleis <%= $next->{station}{platform} %>
um <%= $next->{station}{dep}->strftime('%H:%M') %>
% if ($next->{station}{dep_delay}) {
%= sprintf('(%+d)', $next->{station}{dep_delay})
% }
% }
% elsif ($next->{type} eq 'present' and $next->{station}{arr}) {
Endstation erreicht um
<%= $next->{station}{arr}->strftime('%H:%M') %>
auf Gleis <%= $next->{station}{platform} %>
% if ($next->{station}{arr_delay}) {
%= sprintf('(%+d)', $next->{station}{arr_delay})
% }
% }
% elsif ($next->{type} eq 'present') {
Zug steht in
<%= $next->{station}{arr}->strftime('%H:%M') %>
auf Gleis <%= $next->{station}{platform} %>
% }
% elsif ($next->{type} eq 'next' and $next->{station}{arr}) {
Nächster Halt:
<%= $next->{station}{name} %>
um <%= $next->{station}{arr}->strftime('%H:%M') %>
% if ($next->{station}{arr_delay}) {
%= sprintf('(%+d)', $next->{station}{arr_delay})
% }
auf Gleis <%= $next->{station}{platform} %>
% }
% elsif ($next->{type} eq 'next') {
Nächster Halt:
<%= $next->{station}{name} %>
auf Gleis <%= $next->{station}{platform} %>
% }
% }
% }
Die Zugposition auf der Karte ist eine Schätzung und kann erheblich von der
tatsächlichen Position des Zugs abweichen.
Live-Tracking mit automatischer Kartenaktualisierung wird noch nicht
unterstützt.
% if (my $op = stash('operator')) {
Betrieb: <%= $op %>
% }