Perl6,如何删除字符串中的最后一个字符？

Question

在Perl6中,如何从字符串中删除最后一个字符？

Answer 1

我Perl6如何删除字符串的最后一个字母说明:

$ perl6 -e 'my $x="a b c d "; $x = chop( $x ); say "<$x>";'
<a b c d>

 $ perl6 -e 'my $x="a b c d "; $x ~~ s/" "$//; say "<$x>";'
<a b c d>

注意$意味着匹配字符串的末尾