RosettaCodeData/Task/XML-Output/J/xml-output-1.j

3 lines
88 B
Plaintext

tbl=: ('&quote;'; '&amp;'; '&lt;'; '&gt;') (a.i.'"&<>')} <"0 a.
esc=: [:; {&tbl@:i.~&a.