如何自动初始化Perl中的所有标量变量？

Perl automatically initializes variables默认为undef.

有没有办法覆盖这个默认行为并告诉Perl解释器将变量初始化为零(或其他一些固定值)？

解决方法

Code Complete中的建议对于诸如C之类的语言非常重要,因为当您拥有时

int f(void) {
   int counter;
}

计数器的价值就是占用那段记忆的任何事情.

在Perl中,使用时声明变量

my $counter;

毫无疑问,$counter的价值不是一些随机垃圾.

因此,建议背后的动机,即确保所有变量都以已知值开始,在Perl中自动满足,并且没有必要做任何事情.

你用计数器做的是增加或减少它们.的结果：

my $counter;
# ...
++ $counter;

在Perl中有明确的定义. $counter将保持值1.

最后,我认为,在大多数情况下,Perl中不需要计数器,并且可能需要重写广泛使用计数器变量的代码.