From 57b51d5ca5b4d09d1b7feecf0153571c674a3efc Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Fri, 20 Mar 2009 15:49:45 +0100 Subject: Added --via (→ --from some place --to other place via teh place) MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- bin/efa | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) (limited to 'bin') diff --git a/bin/efa b/bin/efa index 57d2f29..10340ea 100755 --- a/bin/efa +++ b/bin/efa @@ -22,8 +22,7 @@ my $raw; my $cons; my $groupsize = 8; my $offset; -my @from; -my @to; +my (@from, @to, @via); my ($time, $time_for); my $date; my $debug = 0; @@ -34,6 +33,7 @@ $post{type_destination} = 'stop'; GetOptions( 'from=s{2}' => \@from, 'to=s{2}' => \@to, + 'via=s{2}' => \@via, 'time=s' => \$time, 'date=s' => \$date, 'debug' => \$debug, @@ -48,6 +48,9 @@ unless (@to == 2 and @from == 2) { @post{'place_origin','name_origin'} = @from; @post{'place_destination','name_destination'} = @to; +if (@via == 2) { + @post{'place_via','name_via'} = @via; +} if ($time) { @post{'itdTimeHour','itdTimeMinute'} = split(/:/, $time); @@ -156,6 +159,10 @@ Departure place Arrival place +=time B<--via> I I + +Travel via this place + =item B<--debug> Display debug information (additional post requests sent to the site, -- cgit v1.2.3