perl -e 'chmod 0755, <*.*>'