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