use Encode;
use HTML::Entities;
my $str = "\xe2\x80\x9cquotes\xe2\x80\x9d";
utf8::downgrade($str);
print Encode::is_utf8($str) ? 1 :0, " ", encode_entities($str), "\n";
utf8::upgrade($str);
print Encode::is_utf8($str) ? 1 :0, " ", encode_entities($str), "\n";