Fahrt
% if (stash('train_no')) {
<%= stash('train_no') %>
% }
von <%= stash('origin')->{name} %>
nach <%= stash('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} %>
% if ($next->{station}{platform}) {
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} %>
% if ($next->{station}{platform}) {
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') %>
% if ($next->{station}{platform}) {
auf Gleis <%= $next->{station}{platform} %>
% }
% if ($next->{station}{arr_delay}) {
%= sprintf('(%+d)', $next->{station}{arr_delay})
% }
% }
% elsif ($next->{type} eq 'present' and $next->{station}{arr}) {
Zug steht in
<%= $next->{station}{arr}->strftime('%H:%M') %>
% if ($next->{station}{platform}) {
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})
% }
% if ($next->{station}{platform}) {
auf Gleis <%= $next->{station}{platform} %>
% }
% }
% elsif ($next->{type} eq 'next') {
Nächster Halt:
<%= $next->{station}{name} %>
% if ($next->{station}{platform}) {
auf Gleis <%= $next->{station}{platform} %>
% }
% }
% }