Help for this page
for i in $(perl -E 'say for @INC'); do find $i -type d -perm 700 -exec + chmod 755 {} \;;done