use utf8;

utf8::upgrade(   my $key_u = "clé" );
utf8::downgrade( my $key_d = "clé" );

my %hash;
++$hash{$key_u};
++$hash{$key_d};

my ($key) = keys(%hash);