我把这个例子从10日- Perl 6的2010出现日历的饲料经营者与细微变化.uc的.ucfirst是不再有:
my @rakudo-people = <scott patrick carl moritz jonathan jerry stephen>;
@rakudo-people
==> grep { /at/ } ==> map { .uc } ==> my @who-it's-at;
say ~@who-it's-at;
Run Code Online (Sandbox Code Playgroud)
我用一些额外的空格稍微改写一下:
my @rakudo-people = <scott patrick carl moritz jonathan jerry stephen>;
@rakudo-people
==> grep { /at/ }
==> map { .uc } ==> my @who-it's-at;
say ~@who-it's-at;
Run Code Online (Sandbox Code Playgroud)
现在这是一个"虚假陈述":
Run Code Online (Sandbox Code Playgroud)===SORRY!=== Error while compiling ... Bogus statement ------> ==> grep { /at/ }?<EOL> expecting any of: postfix …