From 890fb5128047594a327f4d0ef7c40f768d36b568 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Mon, 3 Mar 2014 13:28:08 +0100 Subject: add -f/--full-route option (show all interemdiate stops) --- bin/efa | 13 +++++++++++++ 1 file changed, 13 insertions(+) (limited to 'bin') diff --git a/bin/efa b/bin/efa index dcd2b41..cbc384a 100755 --- a/bin/efa +++ b/bin/efa @@ -131,6 +131,13 @@ sub display_connection { $c->train_line, $c->train_destination, ); + if ( $opt->{'full-route'} ) { + for my $via_stop ( $c->via ) { + printf( "%-5s %-30s %s\n", + $via_stop->[1], $via_stop->[2], $via_stop->[3] ); + } + } + printf( "%-5s an %s\n\n", $c->arrival_time, $c->arrival_stop_and_platform, ); @@ -152,6 +159,7 @@ GetOptions( exclude|e=s@ extended-info|E from=s@{2} + full-route|f help|h ignore-info|I:s max-change|m=i @@ -328,6 +336,11 @@ schnellbus, seilbahn, schiff, ast, sonstige Display duration, ticket class and price for each route (if available) +=item B<-f>|B<--full-route> + +Display intermediate stops (with time and platform) of each train. Note that +these are not always available. + =item B<-m>|B<--max-change> I Print connections with at most I interchanges -- cgit v1.2.3