1. 数组
#!/usr/bin/perl
my $str = amp;quot;hello,nihao,no,o,goodamp;quot;;
my @arr = split(/,/, $str);
print amp;quot;len:amp;quot; . @arr . amp;quot;\namp;quot;;
for (my $i=0; $i amp;amp;lt; @arr; $ ...……
作者:菜鸟教程小白
|
时间:2022-7-22 08:41
|
阅读:242
|
回复:0