A nickel for today - md5 -

Featuring the Dragonfly web framework
Locked
newdep
Posts: 2038
Joined: Mon Feb 23, 2004 7:40 pm
Location: Netherlands

A nickel for today - md5 -

Post by newdep »

Here's a simple way to check all md5's of the files in the current directory.
You can store them and check them daily or whatever do with the output
you might find handy...(yes i know this can be done differently..but I cant help it ;-)

(silent (map (fn(x) (println (crypto:md5 (read-file x)) " - " x)) (clean directory? (directory))))


PS: (load "/usr/share/newlisp/modules/crypto.lsp")
PPS: checking remote content is a nice way too.


Enjoy..
-- (define? (Cornflakes))

Locked