From af4eb2d003b81afb528a9b4ee1a06ba52062c117 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Tue, 7 Jan 2014 11:04:27 +0100 Subject: efa-m: Just decode all arguments --- bin/efa-m | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'bin/efa-m') diff --git a/bin/efa-m b/bin/efa-m index b76061e..3cae63a 100755 --- a/bin/efa-m +++ b/bin/efa-m @@ -18,6 +18,8 @@ my $efa_url = 'http://efa.vrr.de/vrr/XSLT_DM_REQUEST'; my ( $date, $time, $input_type, $list_lines, $relative_times ); my ( @grep_lines, @grep_platforms ); +@ARGV = map { decode( 'UTF-8', $_ ) } @ARGV; + GetOptions( 'd|date=s' => \$date, 'h|help' => sub { show_help(0) }, @@ -41,9 +43,6 @@ if ( @ARGV != 2 ) { my ( $place, $input ) = @ARGV; -$place = decode( 'UTF-8', $place ); -$input = decode( 'UTF-8', $input ); - if ( $input =~ s{ ^ (? address|poi|stop) : }{}x ) { $input_type = $+{type}; } -- cgit v1.2.3