Perl第三章操作符
一、项和列表操作符(左向)
在perl里,项的优先级最高。项包括变量,引起和类似引起的操作符、大多数圆括弧内的表达式,以及所有其参数被圆括弧包围的函数。
列表操作符(如print)或者哪个命名单目操作符(如chdir)后面跟着左圆括弧作为下一个记号,那么该操作符和它的用圆括弧包围的参数就获得最高优先级,就像普通的函数调用。
因为||比chdir的优先级低,我们有:
chdir $foo || die;#(chdir $foo)||die
chdir ($foo)||die;#(chdir $foo)||die
因为*比chdir的优先级高,我们有:
chdir $foo*die;#chdir ($foo*die)
chdir ($foo)*die;#(chdir $foo)*die
对任何命名单目操作符的数字操作符同样有效,比如rand:
rand 10*20;#rand (10*20)
rand (10)*20;#(rand 10)*20
print、sort、或chomd这样的列表操作符的优先级要么非常高,要么非常低--取决于你是向操作符左边还是右边看。比如:@ary=(1,3,sort 4,2);print @ary;#打印1324
print($foo,exit);#进行print前退出
print $foo,exit;#进行print前退出
#这些是退出前打印:
(print $foo),exit;
print ($foo),exit;
print ($foo&255)+1,"\n";#打印($foo&255)
二、箭头操作符
->双目操作符是一个中缀解引用操作符。
$aref->[42];#一个数组解引用
$href->{"corned beef"};#一个散列解引用
$sref->(1,2,3);#一个子过程解引用
三、自增和自减操作符
当自增以字串方式进行时,每个字符都保留再其范围之内,同时还会进位:
print ++($foo='99');#打印'100'
print ++($foo='Az');#打印'Ba'
四、指数运算
双目**是指数操作符。
-2**4是-(2**4),不是(-2)**4.
五、表意单目操作符
单目!执行逻辑否
单目-,对于数字,执行数学取反。如果操作数是一个标识,则返回一个由负号和标识符连接在一起的字串。
单目~操作符进行按位求反,也就是1的补数。当操作数是字串而不是数字,则返回等字长串,但字串的所有位都是互补的。$neg1=(~$data);#必须加(),不然不产生结果
单目+没有任何语义效果,即使对字串也一样。+取消了圆括弧把前缀操作符变成函数的作用。
rand+(10)*20;#rand (10*20)
单目\给它后面的东西创建一个引用。
六、绑定操作符
双目=~把一个字串和一个模式匹配、替换或者转换绑定在一起。要不然这些操作会搜索或修改包含在$_(缺省变量)里面的字串。你想绑定的字串放在左边,操作符本身放在右边。
如果右边的参数是一个表达式而不是模式匹配、子过程或者转换,那运行时该表达式会被解释成一个搜索模式。$_=~$pat等效于$_=~/$pat/.
双目!~类似=~操作符,只是返回值是=~的对应返回值的逻辑非。下面的表达式是完全一样的:
$string!~/pattern/;
not $string=~/pattern/;
替换返回成功替换的数量,转换也一样。
在列表环境下,模式匹配可以返回和模式里圆括弧相匹配的子字串。
if(($k,$v)=$string=~m/(\w+)=(\w*)/){
print"key $k value $v\n";}#=~把字串$string绑定与右边的模式进行匹配,右边是扫描你的字串里看起来像key=values这样的东西。
七、乘号操作符
除法是以浮点数进行的,除非你用了integer用法模块。
双目×是复制操作符。实际上,它是两个操作符,在标量环境里,它返回一个由左操作数重复右操作数的次数连接起来的字串。
八、附加操作符
+和-操作符都在必要的时候把他们的参数从字串转换为数字值并且返回一个数字值。
perl提供.操作符,它做字串连接处理。比如:
$almost="Fred"."Flintone";#返回FredFlitstone
十、命名单目操作符和文件测试操作符
命名单目操作符
命名单目操作符在你没有提供参数时,缺省使用$_.
文件测试操作符
文件测试操作符是接受一个参数的单目操作符,其参数是文件名或者文件句柄,然后测试该相关的文件,看某些东西是否为真。测试为真时返回1,为假时返回"",如果不存在或无法访问时返回未定义。
十一、关系操作符
有两类,一类操作符操作数字值,另一类操作字串值。>(gt)、>=(ge)、<(it)、<=(le)
操作符在真时返回1,假时返回""。关系操作符不能结合,$a<$b<$c是语法错误的。
没有区域声明,字串的比较基于ASCII/Unicode的顺序比较,尾部空白也计入比较重。如果有区域声明,比较顺序以声明区域的字符集顺序为基础。
十二、相等操作符
==(eq),!=(ne),<=>(cmp)
等于和不等于操作符返回和关系操作符一样,cmp操作符在左操作数小于右操作数时返回-1,相等时返回0,大于时返回1.
优先级比较低。
十三、位操作符
&,|,^(异或) AND,OR,XOR
操作数都是数字,换成整数后再进行为操作,这些整数至少32位长,
操作数都是字串,用两个字串里面的位做位操作,长短不一,perl就认为短的那个在尾部有足够的0来弥补区别。
十四、C风格的逻辑操作符
十五、范围操作符
标量环境:..返回一个布尔值。。。。不太懂。。。。
列表环境:返回一列从左值到右值计数的数值。 for(101..200){print;} #打印101102.。。199200
如果左值大于右边的值,则返回一个空列表。
十六、条件操作符
第一个参数总是处于标量环境,因为它是一个条件。
十七、赋值操作符
TARGET=TARGET OP EXPR
TARGET只计算一次。
赋值操作符从右向左结合,所以这一点可以用于给多个变量赋同一个值。$a=$b=$c=0;
十八、逗号操作符
在标量环境中,先在空环境里计算它的左参数,把那个值抛弃,然后在标量环境里计算它的右参数并且返回。$a=(1,3);#将3赋值给$a;
在列表环境中,逗号只是列表参数的分隔符,而且把他的两个参数都插入到列表中。@a=(1,3);
二十、逻辑与,或,非和异或
&&,||,!,and,or,not
不能简单地把所有||替换为or.假设你把:
$xyz=$x||$y||$z;
改成:$xyz=$x or $y or $z;#错
因为赋值的优先级比or高但是比||低,得改为:$xyz=($x or $y or $z);
二十一、perl里没有的C操作符
单目&取址操作符。不过,perl的\操作符(用于使用引用)填补了这个生态空白:$ref_to_var=\$var;
单目*解取值操作符。perl没有地址,所以它不用解取址。它有引用,所以perl的变量前最字符用做解取址操作符。