perl 开始 头写法

#!/usr/bin/perl -w

# -w 遇到错误警告 并继续执行

use static;  #声明变量用  my  避免变量名重复 

use warnings;#遇到错误警告，老版本使用