Want to make a snapshot backup of your CHMOD settings before engaging in some bulk changes? OH I GOT YOUR BACK! Navigate to whatever folder you want to see and perform the following below:
find ./ | perl -nle 'printf qq~%04o %s\n~, ((stat($_))[2]) & 07777, $_' > /tmp/$(pwd | perl -ple 's`(^/)|(/)`$m = $1 ? q~~ : q~-~`eg')_$(date +%s).txt
NOTE: I think you can accomplish something similar with find itself. But then again there is no fun in that (Perl One-Liners Forever!)
