$dbh->do(q(
    create table cc(
        c varchar(123) charset latin1
    )default charset latin1
));
$dbh->do("insert into cc(c)values('€')");
print $dbh->selectrow_array("select hex(c) from cc"); # E282AC
$dbh->do('drop table cc');