my @player=('reggie','batum','mann');
foreach my $i(@player){ #这里的i相当于索引值
print "$i\n"
}
运行结果:
reggie
batum
mann
my @player=('reggie','batum','mann');
foreach my $i(@player){ #这里的i相当于索引值
print "$i\n"
}
运行结果:
reggie
batum
mann