>>407
use Encode;
my $hoge1 = "ほげ"; # not flagged
my $hoge2 = "\xe3\x81\xbb\xe3\x81\x92"; # not flagged
my $hoge3 = do { use utf8; "ほげ" }; # flagged
my $hoge4 = "\x{307b}\x{3052}"; # flagged
my $hoge5 = decode_utf8($hoge1); # flagged
my $hoge6 = encode_utf8($hoge5); # not flagged

perl側から見れば
$hoge3,$hoge4,$hoge5は「ほげ」という2文字の文字列
$hoge1,$hoge2,$hoge6は「ほげ」を表してはいるもののただの6バイトのバイト列
みたいなかんじ