$ perl -MData::Dumper -E'
    $Data::Dumper::Useqq = 1;
    $_ = "e\x{301}";
    $h{$_} = 1;
    say $h{$_} || 0;
'
1