#
if ( ${#argv} < 1 ) then
	set dir = /snd1
else
	set dir = $argv[1]
endif
purgesf -t14 -N $dir > /tmp/purgemesg
purgesf -t14 -u $dir > /tmp/purgeusrs
foreach n (`cat /tmp/purgeusrs`)
	echo mailing notice to $n
	mail -s "unreferenced sound files" $n < /tmp/purgemesg
end
rm /tmp/purgemesg
rm /tmp/purgeusrs
echo DONE
