find . -type f -exec \
 perl -e 'rename($_, lc) || warn "$_: $!\n" for @ARGV' {} \;