X-Git-Url: https://ruderich.org/simon/gitweb/?p=blhc%2Fblhc.git;a=blobdiff_plain;f=bin%2Fblhc;h=d6fb8511e47cb5abaccd18f2ad63ad509db60bea;hp=eb803248d784514aff2143a3c4835d475daa25db;hb=1c5b2d2454bc2bf82ba6bbcc9ecd8601b162f992;hpb=f61763f97aa10059755d434556945465a4984aab diff --git a/bin/blhc b/bin/blhc index eb80324..d6fb851 100755 --- a/bin/blhc +++ b/bin/blhc @@ -473,6 +473,8 @@ if ($option_all) { my $exit = 0; FILE: foreach my $file (@ARGV) { + print "checking '$file'...\n" if scalar @ARGV > 1; + open my $fh, '<', $file or die "$!: $file"; # Architecture of this file.