Regex to convert non-printable to printable char

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

Dear All, I need to convert a non-printable characters to printable characters in my perl program. I am able to find non-printable characters by following regular expression.

if($string=~/[\x00-\x1F]+/)
{
# here, I want to replace the non-printable characters by printable ch
+aracters which shouldn't cause any problem to XML::Writer emptyTag fu
+nction.
}
[download]

Back to Seekers of Perl Wisdom