commit | 4f0bc18bb037ae04d74c64ed708946738238e09b | [log] [tgz] |
---|---|---|
author | H. Peter Anvin <hpa@zytor.com> | Fri Aug 23 23:04:14 2002 +0000 |
committer | H. Peter Anvin <hpa@zytor.com> | Fri Aug 23 23:04:14 2002 +0000 |
tree | 9c1e83ad3ce0f98488dd1e6bfb8839ea1802993f | |
parent | ad837bebbb5c0be68b51f74283a0e467780f2113 [diff] |
Make sure we don't end up with slashes in the filename
diff --git a/klibc/md5hash.pl b/klibc/md5hash.pl index 616d732..a3aa8f6 100644 --- a/klibc/md5hash.pl +++ b/klibc/md5hash.pl
@@ -8,4 +8,8 @@ $ctx = Digest::MD5->new; $ctx->addfile(*STDIN); -print $ctx->b64digest, "\n"; +$hash = $ctx->b64digest; + +$hash =~ tr/\//_/; # Slashes not wanted + +print $hash, "\n";