r ~msg/address
g/%[a-z0-9]+/s///
g/% +/s///
g/ +?*$/s///
g/?*$/s//$ copy st_bin:dummail. &mymail.@n$ set prot=(s:rwed,o:rwe,g:rwe,w:rwe) &mymail./
w st_bin:mymail.bld
q