diff options
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) }, |