在 Perl 中 foreach 我的 $var ($var, $var) 表达式

当您()创建list.时，这意味着您正在创建.

然后你有这些列表元素的迭代循环。

例如

my @ar = ($a,"default");

foreach (@ar)
{

在上面的代码中，您正在创建列表并存储到数组中。并迭代这些@ar

除了获取 $nm = "foodefault"` 之外，如何使用它？

对于这个问题，您可以使用join函数

my $nm;

foreach  ($a,"default")
{
    $nm.=$_;
}