http://qs1969.pair.com?node_id=730728


in reply to How to convert <,&,>,",' into XML &lt;,&amp;,&gt;,&quot ..

encode_entities($input, q{<>&"'}) from HTML::Entities will do the trick.