show path with open error

[cloudstore.git] / user-md5sum.pl

diff --git a/user-md5sum.pl b/user-md5sum.pl
index e120037..730ed4a 100755 (executable)
--- a/user-md5sum.pl
+++ b/user-md5sum.pl
@@ -13,7 +13,7 @@ die $! unless -d $dir;
 
 my $path = "$dir/.md5";
 
-die $! unless -r $path;
+die "$path: $!\n" unless -r $path;
 
 my %h;
 tie %h, "TokyoCabinet::HDB", $path || die $!;