#!/bin/csh
#set date="10/23/92"
setenv MEETINGS ~/perl/discuss/mtgsfile
set date="01/01/94"
set verbose
foreach i (gcc gnu g++)
	discuss $i -request 'ls all' -quit > $i.ls
	perl dscpurge.perl $date flag < $i.ls > $i.del
	wc -l $i.del
end

