#!/usr/local/bin/tcsh
#du -s `ls`; du -s .
foreach i (`ls`)
if (-d $i) then
	du -s $i
endif
end
	du -s .