X-Git-Url: https://ruderich.org/simon/gitweb/?p=blhc%2Fblhc.git;a=blobdiff_plain;f=bin%2Fblhc;h=d5cc9d624c46fd56ad74f9b22ca548157c9aff83;hp=b5dfa6822e55fec0858cd7ed4006dbbf6549143e;hb=23189f94e3761d3ef1d82b5abccf11564388b4bf;hpb=2a259b08620582db1693281cded2deb29708e16b

diff --git a/bin/blhc b/bin/blhc
index b5dfa68..d5cc9d6 100755
--- a/bin/blhc
+++ b/bin/blhc
@@ -601,6 +601,8 @@ FILE:
 foreach my $file (@ARGV) {
     print "checking '$file'...\n" if scalar @ARGV > 1;
 
+    -f $file or die "No such file: $file";
+
     open my $fh, '<', $file or die $!;
 
     # Architecture of this file.