shithub: riscv

ref: 2b5ab91775b97d9e53b2c92a45164703855029a2
dir: /acme/bin/Unspam/

View raw version 
#!/bin/rc

if(! ~ $#* 0){
	echo usage: Unspam >[1=2]
	exit usage
}

if(! ~ `{pwd} /mail/fs/*/[0-9]* || ! test -f raw || ! test -f unixheader){
	echo must run in mail directory >[1=2]
	exit 'bad dir'
}

cat unixheader raw | upas/unspam