区分 @_ 与 $_;  $_ 表示数组@_中当前被遍历到的元素.遍历整个@_数组输入与输出标准输入chomp($line =)

调用参数

@ARGV

printf

可以转换格式

%g %d %s %f

文件句柄

open

close

say 自动换行的文件句柄

二 控制结构(Control Statements)

1 选择 if结构

Perl的条件控制叙述和C语言很像，让使用者很快就能掌握它。不过Perl比C语言又另外多了些实用的语法

# Expression 就是条件叙述式，Perl和C一样没有定义布尔数据型态(Boolean datatype)，

# 因此 0 是false、非0 是ture。另外要注意字符串运算子和数值运算子要分清楚哦。

# Code Segment 就是用大括号括起来的一堆指令，也就是一个Block。

if (Expression) {Code Segment}

if (Expression) {Code Segment} else {Code Segment}

if (Expression) {Code Segment} elsif (Expression) {Code Segment} else {CodeSegment}

# elsif 就是 else if

# 如果指令(statement)只有一项，可以使用倒装句法，看起来比较简洁。

statement if (Expression);

# unless 就是if not

statement unless (Expression);例：

print “HELLO!\n” if ($name eq “friend”);

$x-=10 if ($x == 100);

2循环结构

Perl的循环控制叙述也和C语言很像，当然，照例Perl也另外多了些实用的语法：

# 注意：纯量变数前面要加个 $ 字号

for($i=0; $i<=10; $i++) {Code Segment}

# foreach 是承袭UNIX的shell script来的，

# 第一个自变量是纯量变数，第二个自变量要用括号括起来，里面是一个纯量数组，

# 顾名思义它就是把数组中的每个元素依序传给第一个自变量，直到全部传完。

# 它和 for($i=0; $i<=$#array; $i++) 用法虽然不同，但目的都是要取出数组的每个元素。

foreach $i (@array) {Code Segment}

# 其实在Perl中，for和foreach是可以混着用的，就看个的人习惯了。

# 下面这行就等于上面第一个叙述，不过简洁多了，大家可以试着用用看。

for $i (0..10) {Code Segment}

# while控制循环和后置循环。

while($i<=10) {Code Segment}

do {Code Segment} while(Expression);

# Perl也有和C语言的break和continue一样的指令，Perl叫它做 last 和 next .

# last是跳出现在所在的循环，next则是跳过下面的指令直接执行下一次的循环。

while(chomp($i=)) {

next if ($i == 5);

last unless ($i > 10);

}