Perl 6中的Trans、hash和character类

Question

当我使用regex作为trans的第一个参数时，可以：

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

使用哈希作为trans的参数也可以：

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

但当我尝试在哈希中使用正则表达式时，它不起作用：

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

Answer 1

'/\w/'

不是正则表达式，它是一个字符串。

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

111