perl 数组访问问题
脚本如下，目的是获取ls命令后的文件名，但是while打印的全部是第一个文件名，有人知道为啥吗
#!/usr/bin/perl
my @test = `ls`;
my $sum = @test;
print STDOUT "The size is $sum \n";
foreach(@test)
{
print STDOUT "$_ \n";
}
my $i = 0;
while($i < $sum)
{
print STDOUT "$test[i]";
$i++;
}
[解决办法]
