tpipefrom.sample - plan9port - [fork] Plan 9 from user space
  HTML git clone git://src.adamsgaard.dk/plan9port
   DIR Log
   DIR Files
   DIR Refs
   DIR README
   DIR LICENSE
       ---
       tpipefrom.sample (380B)
       ---
            1 #!/bin/rc
            2 
            3 rfork e
            4 TMP=/tmp/myupassend.$pid
            5 
            6 # collect upas/send options
            7 options=()
            8 while (! ~ $#* 0 && ~ $1 -*) {
            9         options=($options $1);
           10         shift
           11 }
           12 
           13 # collect addresses and add them to my patterns
           14 dests=()
           15 while (! ~ $#* 0) {
           16         dests=($dests $1);
           17         shift
           18 }
           19 echo $dests > $TMP
           20 upas/list add /mail/box/$user/_pattern $TMP >[2] /dev/null
           21 rm $TMP
           22 
           23 # send mail
           24 upas/send $options $dests