diff options
author | Daniel Friesel <derf@finalrewind.org> | 2011-11-16 10:43:15 +0100 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2011-11-16 10:43:15 +0100 |
commit | acd3e1adeca83d0409a9707cae6ab643c583b8d0 (patch) | |
tree | 4e78eb7a6e857ee8ae4694afe71cf2006acb7747 /bin | |
parent | 6b8626fd76efa0c779c2a3d4944279ba7a4827df (diff) |
Make date/time return real dates, add sched_date/sched_time, unicode fixes
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/efa-m | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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) }, |