1 基本输入输出在 BASH 脚本程序中,我们用 read var 来实现从键盘的输入,用 echo $var 来实现输出。那么在 Perl 中将有一点变化。Perl 中将标准输入用关键词 $var= 在 Perl 语言中,变量 $_ 是许多操作符的缺省变量。因此如果需要读入许多行并对每行分别处理一般这样写: while($_= 或者可以简写为: while( 如果 <> 括号之间没有任何字符,则表示从命令行所指示的文件中读取数据,看下面这个例子(read.pl): #!/usr/bin/perl; 如果在命令行输入 $ perl read.pl read.pl 。这个程序将在屏幕上打印出文件 read.pl 的每一行。 在前面的例子中我们已经看见,Perl 语言中向标准输出输出数据可以用 print 语句。我们在 print 语句中可以输出多个变量,变量之间用 "," 分隔开来。如下面的例子: print 3,45*2,"hello",2+2; 上面的输出语句将给出 "390hello4" 的输出结果。 除了 print 语句以外,Perl 中还提供了一个 printf 语句用于标准输出,不过 printf 更接近于 C 语言的 printf 函数,可以进行格式化的输出,如: printf "%10s% 8d%8.2f\n",$a,$b,$c;
另外 print 和 printf 在输出数组变量的时候也是不同的,如下例: @a = (1 , 2, 3); 输出的结果是: 1 如果在 @a 两边加上 "" ,则输出就都是 123了。 2 分支循环控制结构if 语法Perl 语言的 if...then...else... 语句结构和 C 语言非常相似,该结构一共有三种变种,分别如下: if 语法 1: if(判别运算式) 或写成:表达式为真时的语句 if (判别运算式); 实例为:print "您的分数及格了!\n" if ($score>=60); if 语法 2: if(判别运算式一){ if 语法 3: if (判别运算式一) unless 语法unless的含义就是说“如果判别式不为真,就执行...”。 unless 语法 1: unless(判别运算式) { 或写为:判别式为假时语句 unless (判别运算式);
unless 语法 2: unless(判别运算式) 进阶技巧:"&&"、"||" 及 "? :"这些符号看上去像标点符号,或是表达式的一部分。和 C 语言中一样,他们在 Perl 语言中也可作为控制结构,而且更简洁,只是可读性差了很多。 比如说: 也可以写为: 同样道理,unless(this){that} 可替换为 this||that。 exp1?exp2:exp3 这个式子表示:如果 exp1 为真则求 exp2 的值,否则求 exp3 的值。 while 循环语法Perl 语言中 while, do...while, for, until, foreach 均可以用于实现循环结构,循环中还可以用 last,next,redo 等操作符进行控制。下面我们先介绍 while 语法。 while(判别运算式) { 上个语法在Perl中也可以写成: 程序叙述区块 while(判别运算式); do...while 循环语法do
在 while 和 do while 循环最大的区别是在 do while 循环中,循环体至少会被执行一次。 until 循环语法until(判别运算式) 上个语法在Perl中也可以写成: 程序叙述区块 until (判别运算式); do...until 循环语法do{ for 循环语法for (初始化运算式;判别运算式;循环过程运算式) 或者 for $variable(@array)
第二个语法中如果把 $variable 变量省略的话,就会将数组 @array 的元素一个一个指定给 $_ 这个变量,这是比较精简的写法。其中第一个语法更接近于 C 语言的语法。 foreach 循环语法foreach $variable(@array) 如果把$variable变量省略的话,就会将数组@array的元素一一指定给$_这个内定的输出变量. last 退出循环语法范例: for($i=1;$i<=10;$i++) next 继续循环语法范例: for($i<=10;$i++) |
|