How to convert <,&,>,",' into XML <,&,>," ..

gasho has asked for the wisdom of the Perl Monks concerning the following question:

Dear perl monks is there a perl module that can convert: <,&,>,",' into XML <,&,>," .. Thanks

$xml_native='<message>Hello World</message>';

$xml_converted->$xml_native;

print "$xml_converted"

#prints &lt;message&gt;Hello World&lt;/message&gt;
[download]

(: Life is short enjoy it :)

Back to Seekers of Perl Wisdom