Perl：將Unicode字符串傳遞給chr（）

Question

我對Perl很新，所以請原諒我可能會變成最明顯的答案。

我試圖將Unicode標記傳遞給chr()函數。 下面是我的腳本的編輯示例。

#!/usr/bin/perl 
$unicode = "/u0026amp;"; 
print chr("0x".substr($unicode, 4, 2))."\n"; 

這正常提取從$ unicode的變量。 然而，我能說的問題是chr()函數不喜歡帶引號的字符串，但是如果我刪除引號x in 0x被刪除併成爲無效的026而不是有效的0x26。

無論如何，這真的可以解決。我如何才能讓X在

chr("0x".substr($unicode, 4, 2)) 

的消失，並與ord和hex發送適當的值爲0x26

Answer 1

您不要使用與chr「0X」字符串，該方式就可以了。所以你想：

chr(hex($hexstring))