$ SET PROTECT=(W:RWED)/DEFAULT
$ MAIL
READ
EXTRACT/ALL USRD$:[BBOARD]BBOARD.MAI
DELETE/ALL