Select Code to Download

use Encode qw( encode );
$str = '<p>foo</p>';
...
   print("$str\n");
   $str = encode('UTF-8', $str);
}

<p>foo</p>
<p>foo</p>
<p>foo</p>
<p>foo</p>
<p>foo</p>