utf8の文字化け等々確認する

use Devel::Peek qw/ Dump /;
Dump $rhData->{subject};

とすると、文字コードが標準出力に表示される

SV = PVMG(0x186e5b58) at 0x1877cca0
REFCNT = 1
FLAGS = (POK,pPOK)
IV = 0
NV = 0
PV = 0x1876a330 "[D:F9A5][D:F99F][D:F9A3][D:F8F8]\343\201\202"\0
CUR = 44
LEN = 48