Commit af4eb2d0 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

efa-m: Just decode all arguments

parent 574e6418

bin/efa-m

+2 −3
Original line number Diff line number Diff line
@@ -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{ ^ (?<type> address|poi|stop) : }{}x ) {

	$input_type = $+{type};

}