#!/usr/bin/env perl
use Encode;
use strict;
use warnings;

print encode_utf8("<p>What\x{2019}s up with the water ??</p>"), $/;

__END__

$ perl test.pl
<p>What’s up with the water ??</p>