1 f1007ee0 2006-05-21 devnull #!/usr/local/plan9/bin/rc
 2 f1007ee0 2006-05-21 devnull 
 3 f1007ee0 2006-05-21 devnull if (~ $#* 0)
 4 f1007ee0 2006-05-21 devnull 	echo usage: unspambox mailfs/mbox && exit "usage"
 5 f1007ee0 2006-05-21 devnull box=$1
 6 f1007ee0 2006-05-21 devnull msgs=(`{9p ls $box>[2=1]|awk '$10 ~ /[0-9][0-9]*/{print $10}'})
 7 f1007ee0 2006-05-21 devnull if (~ $#msgs 0)
 8 f1007ee0 2006-05-21 devnull 	echo no messages in $box && exit "none"
 9 f1007ee0 2006-05-21 devnull 
10 f1007ee0 2006-05-21 devnull echo -n adding
11 f1007ee0 2006-05-21 devnull for (m in $msgs){
12 f1007ee0 2006-05-21 devnull 	echo -n ' '$m
13 f1007ee0 2006-05-21 devnull 	unspam $box/$m
14 f1007ee0 2006-05-21 devnull }