diff --git a/bin/hexdump b/bin/hexdump
index 0b59d653..5ad663df 100644
--- a/bin/hexdump
+++ b/bin/hexdump
@@ -216,6 +216,10 @@ sub xd {
     if (@ARGV) {
         while (@ARGV) {
             my $path = shift @ARGV;
+            if (-d $path) {
+                warn "$Program: $path: is a directory\n";
+                next;
+            }
             unless (open $curf, '<', $path) {
                 warn "$Program: $path: $!\n";
                 exit EX_FAILURE;