cl-digest-uniq-files
Synopsis
(process-directory (make-pathname :directory '(:absolute "my" "source" "dir"))
(make-pathname :directory '(:absolute "my" "target" "dir"))
"png" "jpg" "gif")
License
ISC
Recursively find files in a directory by extension, and group them by MD5 digest in an output directory
(process-directory (make-pathname :directory '(:absolute "my" "source" "dir"))
(make-pathname :directory '(:absolute "my" "target" "dir"))
"png" "jpg" "gif")
ISC
Recursively find files in a directory by extension, and group them by MD5 digest in an output directory
ISC License