http://www.perlmonks.org?node_id=1039063


in reply to Re: How to Fix Character Encoding Damaged Text Using Perl?
in thread How to Fix Character Encoding Damaged Text Using Perl?

Whoops :) 
my $bytes = encode( 'UTF-8', $perlunicodestring );
$bytes =~ s{\x52\x65\x3A\x20\x55\x52\x47\x45\x4E\x54}{Re: URGENT}g

[download]

In Section Seekers of Perl Wisdom