Evaluated proc w args {gayvp [string map {{&quot;} {"} {&apos;} {'} {&amp;} {&}} [fourth [regexp -inline -all {<plaintext>(.+?)</plaintext>} [w_ $args]]]]}