你可以写 C 风格的循环，但常常不需要它们。
不要在 foreach 的位置使用它们：
for (my $i = 0; $i <= $#foo; $i++) { # BAD
foreach (@foo) { # BETTER不要在 while 的位置使用它们：
for (my $i = <STDIN>; $i; $i = <STDIN>) { # BAD
while (my $i = <STDIN>) { # BETTER想想你编写的代码，并找找感觉。
创建一个匿名数组引用，并给它赋值：
my $array = [ 'one', 'two', 'three' ];匿名是因为我们不必创建数组。
哈希有相似的构造器：
my $hash = { one => 1, two => 2, three => 3 };看作你应认为的而非引用。
q[qrwx]?//、m//、s/// 及 y///
Perl 让你自行指定定界符：
'text' => q/text/
"text" => qq/text/
qr/text/。除此之外，在 Perl 匹配及替换操作符外没有别的方式指定正则表达式匹配。("text", "text") => qw(text text);
`text` => qx/text/
m//）、正则替换（s///）、及转换(tr///、y///) 工作方式相同你可以使用除空白之外的任意字符。但要注意平衡括号或花括号：
qq//
qq#A decent <html> delimiter </html> #
qq( man perl(1) for details ) # valid!global、local、my 及 our
use vars 声明全局变量my 声明词法变量local 并非你所认为的，除非你知道为何使用 local，否则使用 my 代替our