将带空格的字符串推入数组会导致Perl中有两个数组元素

Question

我正在尝试将字符串元素推送到Perl中的数组中。被推送的字符串包含空格。这导致数组中有两个元素 - 按空格分割。

my @filenames;
$filename = "Test Test.test";
push(@filenames, $filename);

while (<@filenames>)
{
        print  "Here: $_\n";
}

这样可以输出

Here: Test

Here: Test.test

虽然我期待输出为：

enter code here此处：Test Test.test

如何实现所需的输出？

谢谢， Pranav

Answer 1

my @filenames;
$filename = "Test Test.test";
push(@filenames, $filename);

for (@filenames)
{
    print  "Here: $_\n";
}

这会产生预期的输出。不确定你为什么要<@filenames>