X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=bin%2Fbro-perl;h=45eed8e3dff125d2ea7463335b0e738904195bc2;hb=7e5e9e1b9590458bd563640c4adbc70c00403d91;hp=ffad9052518d903392d222af0c47938e71715a73;hpb=807f50a6c182d8c3b733e028821829c8ace89499;p=io-compress-brotli.git diff --git a/bin/bro-perl b/bin/bro-perl index ffad905..45eed8e 100755 --- a/bin/bro-perl +++ b/bin/bro-perl @@ -1,11 +1,10 @@ #!perl -# use warnings; use strict; use 5.014; -use bytes; +use bytes (); use File::Slurp; use Getopt::Long; @@ -54,7 +53,7 @@ for ( 1..$REPEAT ) { my $ofh; if( $OUTPUT ) { - die "Output file exists" + die "Output file exists\n" if( -e $OUTPUT && $REPEAT == 1 && !$FORCE ); open $ofh, ">", $OUTPUT or die "Cannot open output file $OUTPUT.\n";