声明：本文大部分内容摘自Perl manual中的perlstyle！
1. 使用use strict; 和use warnings; 运行程序，这样可以检查出潜在的错误，使程序的复用性更好。
2. 使用4列宽度分开不同层次代码，同层次代码列对齐。
3. 尽量保持左花括号和关键字在同一行，之前留空格，右花括号和左花括号的关键字对齐。
4. 单行代码块的所有内容放在同一行，分号可省略。
5. 操作符两边留空格，括号中复杂的下标表达式两边留空格，逗号后面留空格，函数名和左括号之间不要留空格。
6. 尽量省略不必要的标点，但是合理使用()使代码更清晰。
7. 突出代码中重要的部分，例如下面的几个例子前者比后者更好：
open(FOO,$foo) || die "Can't open $foo: $!";
die "Can't open $foo: $!" unless open(FOO,$foo);
print "Starting analysis\n" if $verbose;
$verbose && print "Starting analysis\n";
8. 使用循环LABEL和last, next关键字使循环代码更可读，例如：
LINE:
for (;;) {
statements;
last LINE if $foo;
next LINE if /^#/;
statements;
}
9. 尽量不要使用grep(), map()和反引号`$cmd`，因为它们都丢失了执行的返回值，使用foreach循环或者system()函数代替。
10. 使用新的关系运算符and和or代替&&和||，这样可以避免很多不必要的麻烦。
11. 总是检查系统调用的返回值，奖出错信息和系统诊断信息写到STDERR，例如：
opendir(D, $dir) or die "can't opendir $dir: $!";
12. Be consistent & Be nice.
![]()
