diff options
Diffstat (limited to 'scripts/training/train-model.perl')
-rwxr-xr-x | scripts/training/train-model.perl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/scripts/training/train-model.perl b/scripts/training/train-model.perl index f92e545be..4c355479c 100755 --- a/scripts/training/train-model.perl +++ b/scripts/training/train-model.perl @@ -1,5 +1,6 @@ -#!/usr/bin/perl -w +#!/usr/bin/env perl +use warnings; use strict; use Getopt::Long "GetOptions"; use FindBin qw($RealBin); @@ -404,8 +405,8 @@ else { $SORT_EXEC = 'sort'; } -my $GZIP_EXEC; # = which("pigz"); -if(-f "/usr/bin/pigz") { +my $GZIP_EXEC; +if(`which pigz`) { $GZIP_EXEC = 'pigz'; } else { |