VERBOSE=yes
:0
*$ $DEST
{
  :0
  * DEST ?? .+[^/]$
  { DEST="$DEST/" }

  :0
  *$ DEST ?? ^$BASE/\.
  { }

  :0 E
  *$ DEST ?? ^\.
  { DEST="$BASE/$DEST" }

  :0 E
  { DEST="$BASE/.$DEST" }

  LOG="deliver:     delivering message $MSGID to $DEST$NL"
  :0
  $DEST
}

:0 E
{
  LOG="deliver:     delivering message $MSGID to default destination$NL"
  :0
  $DEFAULT
}