%= join( ' / ', $wr->origins )
→
%= join( ' / ', map { $_->{name} } $wr->destinations )
% if ($has_multi_dest) {
% for my $destination ($wr->destinations) {
Nach <%= $destination->{name} %> in Abschnitt <%= join(q{}, sort @{$destination->{sections} // []}) %>
% }
% }
<%= $wr->station_name %> Gleis <%= $wr->platform %>
% for my $desc ($wr->train_descriptions) {
% if ($desc->{text}) {
%= $desc->{text}
% if ($has_multi_desc and length(join(q{}, sort @{$desc->{sections}}))) {
in Abschnitt <%= join(q{}, sort @{$desc->{sections}}) %>
% }
% }
% }
% if (not $wr->has_bad_wagons) {
% for my $section ($wr->sections) {
%= $section->{name}
% }
% }
% for my $wagon ($wr->wagons) {
%= include '_wagon', direction => $wr->direction, wagon => $wagon, type => $wr->train_type, wref => $wref, exit_dir => stash('exit_dir');
% }
Quelle: DB Wagenreihungs-API. Angaben ohne Gewähr.
% }