fleXchange

FleXchange is a Perl script to recursively change permissions (and owning) of a file system's sub-tree. Using FleXchange you can, with only one command, set permission of all directories contained in the sub tree to 0755 and permission of files contained in each directory to 0644. Optionally you can also change owner and group of entire sub-tree.