if (!$CONTINUE)
{
   foreach /^(To|Cc):\s+(.*)\s+\<$MEMBERGROUPREGEX\>$/
   {
      TOALIAS=$MATCH2
   }
   CONTINUE=1
   TOMEMBER=1
   MAILGROUP=$MEMBERGROUP
   SUBJECT="Crop Swap Member"
}
elsif ($CONTINUE)
{
   gdbmopen($MLIST, "R")
   ALIAS=gdbmfetch(tolower($FROM))
   gdbmclose
   if ($ALIAS eq "")
   {
      EXITCODE=$UNREGISTERED
      exit
   }

   #
   # Registered senders only
   include "$FILTERDIR/subscriptions"

   gdbmopen($SLIST, "R")
   if (gdbmfetch(tolower($FROM)) ne "SUBSCRIBE")
   {
      gdbmclose
      cc "|$DEBUGMAIL no-forward"
      EXITCODE=$UNSUBSCRIBED
      exit
   }
   gdbmclose

   #
   # Subscribesd senders only
   NOFORWARD=$FROM
   FROM=$ALIAS
   to "!"
}