跨，亂碼，字符類在Perl 6

Question

當我使用一個regex作爲trans第一個參數，它的確定：

> say 'abc'.trans(/\w <?before b>/ => 1) 
1bc 

使用hash作爲trans的說法也OK：

> my %h 
> %h{'a'} = '1' 
> say 'abc'.trans(%h) 
1bc 

但是當我嘗試在哈希使用正則表達式，這是行不通的：

> my %h 
> %h{'/\w/'} = '1' 
> say 'abc'.trans(%h) 
abc 

Answer 1

'/\w/' 

不是一個正則表達式，它是一個字符串。

---

my %h{Any};   # make sure it accepts non-Str keys 
%h{/\w/} = 1; 
say 'abc'.trans(%h) 

111