6 [ $# = 1 ] || fail
"usage: $0 GROUP"
8 entry
=`cdbget "g:$group" <groups.cdb` || bad
"unknown group $group"
10 [ $3 = none
] && bad
"posting to mail.$2 forbidden"
12 sed -n
":top; /^$/,\$ b ok
13 /^[Tt][Oo]: / ! b ok; :loop; n; /^ / b loop; b top
15 qmail-inject
-a
-f
$USER-$1@
`cat $QMAIL/control/me` $3