Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl;

...

print "To decode --> $to_decode\n";
print "Encoded data --> $encoded\n";

Select or download this

To decode --> TEST&TEST;A&E&an&nbsp;HTML---&nbsp;string - &lt;&copy; T
+VS&gt;
Encoded data --> TEST&amp;TEST;A&amp;E&amp;an&amp;nbsp;HTML---&amp;nbs
+p;string - &amp;lt;&amp;copy; TVS&amp;gt;