From acd3e1adeca83d0409a9707cae6ab643c583b8d0 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Wed, 16 Nov 2011 10:43:15 +0100 Subject: Make date/time return real dates, add sched_date/sched_time, unicode fixes --- bin/efa-m | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'bin/efa-m') diff --git a/bin/efa-m b/bin/efa-m index 8c2f982..a6b8bec 100755 --- a/bin/efa-m +++ b/bin/efa-m @@ -5,6 +5,8 @@ use 5.010; our $VERSION = '0.02'; +binmode( STDOUT, ':encoding(utf-8)' ); + use Getopt::Long qw(:config no_ignore_case); use List::Util qw(max); use Travel::Status::DE::VRR; @@ -13,8 +15,6 @@ my ( $date, $time, $input_type ); my ( @grep_lines, @grep_platforms ); my @output; -binmode( STDOUT, ':encoding(utf-8)' ); - GetOptions( 'd|date=s' => \$date, 'h|help' => sub { show_help(0) }, -- cgit v1.2.3