Evaluated proc w args {fourth [regexp -inline -all {<plaintext>(.+?)</plaintext>} [w_ $args]]}