my $dir;
my $prefix;
+my $errorcount = 0;
my $openssl = $ENV{OPENSSL} || "openssl";
my $pwd;
my $x509hash = "-subject_hash";
hash_dir($_);
} else {
print "Skipping $_, can't write\n";
+ $errorcount++;
}
}
}
+exit($errorcount);
sub hash_dir {
my %hashlist;