Select Code to Download

#!perl

...
my ($basename,undef,undef) = fileparse($filename);

Win32::MsgBox("The MD5 sum for file \'$basename\' is now in the clipbo
+ard:\n\n$digest", MB_ICONINFORMATION, "md5sum");

Windows Registry Editor Version 5.00

...

[HKEY_CLASSES_ROOT\*\shell\MD5 Sum\command]
@="c:\\projects\\md5sum\\md5sum.exe \"%1\""