#!/bin/csh
# Recursively descend through a directory structure
# and make all directories world-readable and executable,
# and each file world readable. 
# Make all files writeable by owner.
foreach file (`ls`)
  if (-d $file) then
     chmod 755 $file
     cd $file
     correct
     cd ..
  else
      chmod a+r $file
  endif
  end

