set -x
set -e
du -sk .
find . -type f -name '*.o' | xargs rm
du -sk .
find . -type f -name '*.a' | xargs rm
du -sk .
gfind . -perm +ugo+x -type f | perl /mit/gcc-3.2/src/scripts/filter-executables.pl | xargs rm
du -sk .