D:\>perl -MDigest::MD5 -e "print Digest::MD5->new->add(<>)->digest" md5 japh.pl
Can't open md5: No such file or directory at -e line 1.
hi-bit-string

D:\>foo.bat md5 japh.pl
hi-bit-string