use strict ；
加载了这个 module 之後, 你所有程序中的变数都必须先宣告才能使用, 否则会报错并停止执行.
定义变数可以有 local, my 和 our. 不过新版本的 perl 里都建议使用 my $x = 123 这形态的宣告

命令use strict意味着所有变量必须用my来声明，裸单词必须用引号括起来。

 use strict语句实际上可以称为编译器命令。它能够告诉 Perl，给下列情况做上指向

 当前代码块或文件中的运行期错误的标志：

  试图使用不是用m y声明的变量名（不是特殊变量的名字）。

 当函数定义尚未设置时，试图将裸单词用作函数名。

 其他潜在的错误。

 use strict解决的最后一个问题是裸关键字的问题。请看下面这个代码：

 $var = value ;

 在这个例子中，你打算将 value解释为一个函数调用还是一个字符串呢（但是你忘记了引号）？Perl的use strict命令会指出这个代码是个含糊的代码，并且不允许使用这种句法，除非在到达该语句之前已经对子例程的值进行了声明。