1 # $Id: mail.flt,v 1.1 1996-05-01 13:46:51 adam Exp $
2 BEGIN { begin record wais }
3 /^From:/ BODY /$/ { data -element name $1 }
4 /^Subject:/ BODY /$/ { data -element title $1 }
5 /^Date:/ BODY /$/ { data -element dateOfLastModification $1 }
7 data -text -element Body $1