[ Perl 6 ] 字符串基础操作

Posted 2020-10-05

 

[ Perl 6 ] 字符串基础操作

There is more than one way to do it.

1. 字符串转换为列表："banana".comb; # => (b a n a n a)
2. 字符串长度：chars "banana"; "banana".chars; # => 6
3. 字符串查找：
   • index "banana", "na"; # => 2
   • index "banana", "ni"; # => Nil
   • index "banana", "na", 3; # => 4
   • index "banana", "na", 5; # => Nil
   • rindex "banana", "na"; # => 4
   • rindex "banana", "na", 3; # => 2
4. 字符串子串（起始位置、子串）：
   • substr "I have a dream", 0, 6; # => I have
   • "I have a dream".substr(9, 5); # => dream
   • substr "I have a dream", 9, 10; # => dream
   • substr "I have a dream", *-5; # => dream
5. 字符串翻转：flip "banana"; # => ananab
6. 字符串分割（split）：split "-", "2017-09-06"; # => (2017 09 06)
7. 字符串连接："ba" ~ "na"; # => bana
8. 字符串合并（join）：join "-", <I have a dream>; #=> I-have-a-dream
9. 字符串大小写改变：
   • lc "April"; # => "april"
   • uc "april"; # => "APRIL"
   • tc "april"; # => "April"

?