I found this code particularly useful and elegant. The use of the find command with the subroutine really made a hard task easy. I did not use all of it, but there are definitely some nice things happening here.
in reply to (code) Recursive chmod chown chgrp in 30 lines
I found one reason to use this type of thing instead of chown/chgrp/chmod is because this is more portable. As long as perl is installed this script will work where as the chown/chgrp/chmod commands may not be on every system that runs perl. This allows me to only require perl for my users.