Perl 的 $ 是多少？变量为?

Question

有谁知道以下代码片段中的 $; （第一个分割函数参数）是什么：

      local(@a) = ();
      local($i) = 0;
      for ($i = 0; $i < $d; $i++) {
         @a = split($;, @b[$i]);
         $c     = @a[0];
      }

除了 for 循环之外，在脚本中的任何位置都找不到标量。

任何帮助表示赞赏。

Answer 1

Perl 的特殊变量记录在 perlvar 中，包括 $ ;

$SUBSEP

$;

多维数组模拟的下标分隔符。如果您将哈希元素称为

<前><代码>$foo{$a,$b,$c}

这确实意味着

$foo{join($;, $a, $b, $c)}

但不要放

@foo{$a,$b,$c} # 一个切片——注意 @

这意味着

<代码>($foo{$a},$foo{$b},$foo{$c})

默认为"\034"，与awk中的SUBSEP相同。如果您的密钥包含二进制数据，则 $; 可能没有任何安全值。 （助记：逗号（语法下标分隔符）是一个分号。是的，我知道，这很蹩脚，但是 $, 已经被用来表示更重要的东西。）

考虑使用“真正的”多维数组，如 perllol 中所述。

我们可以猜测为什么要使用它（例如，也许@b包含一些散列的键），但是知道@b是如何创建的会让我们提供更有帮助的答案。

另请注意，@b[$i] 和 @a[0] 可能应该是

$b[$i]

and

$a[0]

。使用前导 @ 时，它们是单元素数组切片，但使用 $ 时，它们是简单标量。

Answer 2

Perl 特殊变量在 perlvar 中列出。