use Encode qw( encode_utf8 );

my $encoded = encode_qp(encode_utf8($str));