奇怪啊!这两种写法有什么不同

[AiNet]

while(defined($filename = glob("*.pl")))
{
print($filename);
}

defined($filename1 = glob("*.pl"));
defined($filename2 = glob("*.pl"));
print($filename1);
print($filename2);

但是结果是

1 : env.pl print.pl

2 : env.pl env.pl

[lucong]

第一个是List context，返回文件列表；第二个是Scalar context，返回列表中的第一个文件名。