explicit implementation of shebang run parameters
[git-grep-footer.git] / git-grep-footer
index dcb24d4e35e36d8f812c856951d2dc4788f09e60..bc71345250a9190b0e9297b4b1e0572dfc6df5a5 100755 (executable)
@@ -1,7 +1,8 @@
-#!/usr/bin/perl -0 -CO
+#!/usr/bin/perl
 use 5.010;
 use strict;
 use warnings;
+use open ':std', OUT => ':utf8';
 use Encode 'decode';
 use Data::Dump 'pp';
 use Getopt::Long;
@@ -14,6 +15,7 @@ GetOptions(\my %opt,
 ) or die;
 
 local $| = 1;
+local $/ = "\0";
 
 my $HEADERMATCH = qr/ [a-z]+ (?: (?:-\w+)+ | \ by ) /ix;