% for my $res (@{$connections}) { % my ($train, $via, $via_arr) = @{$res}; % $via_arr = $via_arr ? $via_arr->strftime('%H:%M') : q{}; % my $td_class = ''; % my $link_class = 'action-checkin'; % if ($train->is_cancelled) { % $td_class = 'cancelled'; % $link_class = 'action-cancelled-from'; % } % if ($checkin_from) { % } % else { % } % }

% if ($train->platform) { % if ($checkin_from) { Gleis <%= $train->platform %> % } % else { Gleis <%= $train->platform %> % } % } % if ($checkin_from) { <%= $train->line %> % } % else { %= $train->line % }	% if ($checkin_from) { <%= $via->{name} %> % } % else { %= $via->{name} % }	% if ($train->is_cancelled) { %= $train->sched_datetime->strftime('%H:%M') ⊖ % } % else { %= $train->datetime->strftime('%H:%M') % } % if ($via_arr) { → <%= $via_arr %> % } % if ($train->delay) { %= sprintf('(%+d)', $train->delay) % }