acme/bin/Unspam

   1 #!/bin/rc
   2
   3 if(! ~ $#* 0){
   4         echo usage: Unspam >[1=2]
   5         exit usage
   6 }
   7
   8 if(! ~ `{pwd} /mail/fs/*/[0-9]* || ! test -f raw || ! test -f unixheader){
   9         echo must run in mail directory >[1=2]
  10         exit 'bad dir'
  11 }
  12
  13 cat unixheader raw | upas/unspam