Perl unicode哈希键查找

Question

我很困惑的pericode和Unicode在Perl中。

我从MySQL数据库得到了这个散列。

my $hashFromDB = { "Ves\x{101}kha" => "some value" }; 

但我只知道，在这种形式符号

my $key = "Ves\u0101kha"; 

的关键我怎么可以转换为\ uXXXX记号到\ X {XXX}，这样我可以用钥匙将其值。

谢谢。

Answer 1

\x{}在Perl中转义几乎完全像在JS中跳转到\u一样。您只需使用代码里面{}，完全按照你的第一个片段：

my $key = "Ves\x{101}kha"; 
my $value = $hashFromDB->{$key}; 

如果您有文字串与\u在里面，我以为意为“\ u加上4个十六进制数字形成码点号”，只是与正则表达式预处理它会用相同的代码真正的字符替换这样的序列：

$key =~ s/\\u([a-fA-F0-9]{4})/chr(hex($1))/ge; 

BTW，\u有在Perl不同的意义 - 它upercases下一个符号。你可以check complete list of escapes in documentation。