Efficient and compact unix one liner
(faster than using -exec on the find command) combining shell and perl,
but dangerous if filenames contain newlines or other whitespace
(I think some find's have an option to quote the output, but
I haven't seen one yet):