note
tphyahoo
Answering my own question (partially), I think I have to do something along the lines of
<p>
<code>
use strict;
use warnings;
use Encode::Encoder;
my $utf8String="\x{2019}";
my $latin1String = latin1ify($utf8String);
print "$latin1String\n";
sub latin1ify {
my $string = shift || "";
Encode::encode( "iso-8859-1" ,
Encode::decode_utf8($string)
);
}
</code>
<p>
which gives "?" and then strip the question marks.
<p>
But I have to go now, so I'll finish this another time.
592806
592806