TCL script to open a particular directory, Inside that directory, open each subdirectory and delete only \'c\' files
