#!/bin/csh -f

foreach d (S.*)
	echo $d
	find $d -name \*- -type f -print -exec rm {} \;
end
