<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">#!/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 &gt; $i.ls
	perl dscpurge.perl $date flag &lt; $i.ls &gt; $i.del
	wc -l $i.del
end

</pre></body></html>