例如,我们有$list1var作为 -
$list1 = "GET, POST, GET, DELETE";
Run Code Online (Sandbox Code Playgroud)
预期产量 -
GET,POST,DELETE
Run Code Online (Sandbox Code Playgroud)
use List::MoreUtils qw(uniq);
my $list1 = "GET, POST, GET, DELETE";
print join ",", uniq split /\W+/, $list1;
Run Code Online (Sandbox Code Playgroud)
产量
GET,POST,DELETE
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
76 次 |
| 最近记录: |