perl为什么这不会在严格使用时产生错误？

Question

我有下面的Perl代码。我使用-w并严格使用。为什么@LDRATA :: SUITES不会产生错误？ $ x呢？

#!/grid/common/bin/perl -w 
use strict; 

for (@LDRATA::SUITES) { print("one\n"); } 
for ($LDRATA::SUITES[0]) { print("two\n"); } 
for($x) { print("three\n"); } 

Answer 1

正如其他人所说，如果变量未声明为或完全合格，则使用严格变量将引发错误。这里完全合格。

如果你在一个地方给出不正确的包的名字，你会得到一个警告（虽然不是从严格）：

$ perl -w 
use strict; 

for (@LDRATA::SUITES) { print("one\n"); } 
__END__ 
Name "LDRATA::SUITES" used only once: possible typo at - line 3. 

如果你给它一个以上的地方，Perl不具有任何方式来说明这不是故意的，所以没有错误或警告是可能的。

Answer 2

根据的perldoc，use strict vars会如果变量不声明或完全限定抛出一个错误。

@LDRATA::SUITES是一个完全合格的变量的例子。