bin/upas/unspambox


1
2
3
4
5
6
7
8
9
10
11
12
13
14

#!/usr/local/plan9/bin/rc

if (~ $#* 0)
	echo usage: unspambox mailfs/mbox && exit "usage"
box=$1
msgs=(`{9p ls $box>[2=1]|awk '$10 ~ /[0-9][0-9]*/{print $10}'})
if (~ $#msgs 0)
	echo no messages in $box && exit "none"

echo -n adding
for (m in $msgs){
	echo -n ' '$m
	unspam $box/$m
}