perl数组如何工作$"

Question

我对这段代码的结果感到困惑.

my @lines;
for (my $count = 0; $count < 3; $count++) {

    print "Give me input again ";
    chomp (my $line = <STDIN>);
    $lines[$count] = $line;
}

$" = "|";
print "@lines\n";

当我运行代码时,这是如何 $" = "|";工作的？结果是一|二|三.代码如何工作以便它放置"|" 每次输入之间？

Answer 1

它只是将数组插入到双引号字符串中.

"$foo\n"

是完全相同的

$foo . "\n"

和

"@lines\n"

是完全相同的

join($", @lines) . "\n"

这在perldata和perlvar中有记录.