深入学习perl5运算符

发布时间:2020-03-11编辑:脚本学堂
任何一种语言中,关于运算符的知识,都是最基础与最常用的,当然perl也不例外。今天我们为大家介绍perl5中运算符的相关知识,包括算术运算符、整数比较运算符、字符串比较运算符、逻辑运算符等。

任何一种语言中,关于运算符的知识,都是最基础与最常用的,当然perl也不例外。
今天我们为大家介绍perl5中运算符的相关知识,包括算术运算符、整数比较运算符、字符串比较运算符、逻辑运算符等。
相信对你深入学习掌握perl知识,会有很大的帮助。

一、算术运算符 :+(加)、-(减)、*(乘)、/(除)、**(乘幂)、%(取余)、-(单目负)

(1)乘幂的基数不能为负,如 (-5) ** 2.5 # error;
(2)乘幂结果不能超出计算机表示的限制,如10 ** 999999 # error
(3)取余的操作数如不是整数,四舍五入成整数后运算;运算符右侧不能为零
(4)单目负可用于变量: - $y ; # 等效于 $y * -1
(5)对应有 +=、-=、*=、/=、**=、%=

二、整数比较运算符

Table 1. 整数比较运算符

操作符 描述
< 小于
> 大于
== 等于
<= 小于等于
>= 大于等于
!= 不等于
<=> 比较,返回 1, 0, -1

操作符<=>结果为:
0 - 两个值相等
1 - 第一个值大
1 - 第二个值大

三、字符串比较运算符

Table 2. 字符串比较运算符
操作符 描述  
lt 小于  
gt 大于  
eq 等于  
le 小于等于  
ge 大于等于  
ne 不等于  
cmp 比较,返回 1, 0, or -1  

四、逻辑运算符

逻辑或:$a || $b 或 $a or $b
逻辑与:$a && $b 或 $a and $b
逻辑非:! $a 或 not $a
逻辑异或:$a xor $b

五、位运算符

位与:&
位或:|
位非:~
位异或:^
左移:$x << 1
右移:$x >> 2
注:不要将&用于负整数,因为PERL将会把它们转化为无符号数。

六、赋值运算符

Table 3. 赋值运算符

操作符 描述
= Assignment only
+= Addition and assignment
-= Subtraction and assignment
*= Multiplication and assignment
/= Division and assignment
%= Remainder and assignment
**= Exponentiation and assignment
&= Bitwise AND and assignment
|= Bitwise OR and assignment
^= Bitwise XOR and assignment

Table 4. 赋值运算符例子

表达式 等效表达式
$a = 1; none (basic assignment)
$a -= 1; $a = $a - 1;
$a *= 2; $a = $a * 2;
$a /= 2; $a = $a / 2;
$a %= 2; $a = $a % 2;
$a **= 2; $a = $a ** 2;
$a &= 2; $a = $a & 2;
$a |= 2; $a = $a | 2;
$a ^= 2; $a = $a ^ 2;

注:
1. =可在一个赋值语句中出现多次,如:
$value1 = $value2 = "a string";
2. =作为子表达式
($a = $b) += 3;
等价于
$a = $b;
$a += 3;

七、自增自减运算符 :++、--

.不要在变量两边都使用此种操作符:++$var-- # error
.不要在变量自增/减后在同一表达式中再次使用:$var2 = $var1 + ++$var1; # error
.在PERL中++可用于字符串,但当结尾字符为'z'、'Z'、'9'时进位,如:
$stringvar = "abc";
$stringvar++; # $stringvar contains "abd" now

$stringvar = "aBC";
$stringvar++; # $stringvar contains "aBD" now

$stringvar = "abz";
$stringvar++; # $stringvar now contains "aca"

$stringvar = "AGZZZ";
$stringvar++; # $stringvar now contains "AHAAA"

$stringvar = "ab4";
$stringvar++; # $stringvar now contains "ab5"

$stringvar = "bc999";
$stringvar++; # $stringvar now contains "bd000"
.不要使用--,PERL将先将字符串转换为数字再进行自减
$stringvar = "abc";
$stringvar--; # $stringvar = -1 now

.如果字符串中含有非字母且非数字的字符,或数字位于字母中,则经过++运算前值转换为数字零,因此结果为1,如:
$stringvar = "ab*c";
$stringvar++;
$stringvar = "ab5c";
$stringvar++;

八、字符串联结和重复运算符

1. 联接: .
2. 重复:x
3. 联接且赋值(类似+=): .=
例:
$newstring = "potato" . "head";
$newstring = "t" x 5;
$a = "be";
$a .= "witched"; # $a is now "bewitched"

九、逗号运算符

其前面的表达式先进行运算,如:
$var1 += 1, $var2 = $var1;
等价于
$var1 += 1;
$var2 = $var1;
使用此操作符的唯一理由是提高程序的可读性,将关系密切的两个表达式结合在一起,如:
$val = 26;
$result = (++$val, $val + 5); # $result = 32
注意如果此处没有括号则意义不同:
$val = 26;
$result = ++$val, $val + 5; # $result = 27

十、条件运算符

与C中类似,条件?值1:值2,当条件为真时取值1,为假时取值2,如:
$result = $var == 0 ? 14 : 7;
$result = 43 + ($divisor == 0 ? 0 : $dividend / $divisor);
PERL 5中,还可以在赋值式左边使用条件操作符来选择被赋值的变量,如:
$condvar == 43 ? $var1 : $var2 = 14;
$condvar == 43 ? $var1 = 14 : $var2 = 14;

十一、运算符的优先级

Table 5. 运算符的优先级

操作符 描述
++, -- 自增,自减
-, ~, ! 单目
** 乘方
=~, !~ 模式匹配
*, /, %, x 乘,除,取余,重复
+, -, . 加,减,联接
<<, >> 移位
-e, -r, etc. 文件状态
<, <=, >, >=, lt, le, gt, ge 不等比较
==, !=, <=>, eq, ne, cmp 相等比较
& 位与
|, ^ 位或,位异或
&& 逻辑与
|| 逻辑或
.. 列表范围
? and : 条件操作符
=, +=, -=, *=, 赋值
and so on  
, 逗号操作符
not Low-precedence logical NOT
and Low-precedence logical AND
or, xor Low-precedence logical OR and XOR

运算符结合性(associativity):

Table 6. 运算符结合性

操作符 结合性
++, --
-, ~, ! Right-to-left
** Right-to-left
=~, !~ Left-to-right
*, /, %, x Left-to-right
+, -, . Left-to-right
<<, >> Left-to-right
-e, -r,
<, <=, >, >=, lt, le, gt, ge Left-to-right
==, !=, <=>, eq, ne, cmp Left-to-right
& Left-to-right
|, ^ Left-to-right
&& Left-to-right
|| Left-to-right
.. Left-to-right
? and : Right-to-left
=, +=, -=, *=, Right-to-left
and so on  
, Left-to-right
not Left-to-right
and Left-to-right
or, xor Left-to-right

PERL运算符简单应用

一、赋值(Assignment)运算符

符号 范例 说明
= $x=$y; 把$x的值赋给$y
+= $x+=$y; $x=$x+$y;把$x加上$y后再赋值给$x
-= $x-=$y; $x=$x-$y;把$x减$y后再赋值给$x
*= $x*=$y; $x=$x*$y;把$x乘$y后再赋值给$x
/= $x/=$y; $x=$x/$y;把$x除$y次方后再赋值给$x
**= $x**=$y; $x=$x* *$y;求出$x乘$y次方后再赋值给$x
%= $x%=$y; $x=$x%$y;把$x除以$y的余数后再赋值给$x
.= $str1.=$str2; $str1=$str1.$str2;把$str1这个字符串再加上$str2这个字符串后再赋值给$str这个字符
x= $str x=$y; $str=$str x $y;循环$str字符$y次再把结果赋值给
$str这个字符串

二、运算(Arithmetic)运算符

符号 范例 说明
+ $a=$x+$y 把$x和$y加后再赋值给$a
- $a=$x+$y 把$x和$y减后再赋值给$a
* $a=$x*$y 把$x和$y乘后再赋值给$a
/ $a=$x/$y 把$x和$y除后再赋值给$a
% $a=$x%$y 把$x和$y除后再余数赋值给$a
** $a=$x**$y 把$x和$y乘次方后再赋值给$a
++ $x++;++$x 把$x加一后再赋值给$x
-- $x--;--$x 把$x减一后再赋值给$x
. $a=$x.$y 把$x字符串和$y字符串合拼后再赋值给$a

三、数值(Number Values)运算符

符号 范例 说明
> $x>$y 如果$x大于$y返回1否则返回0
>= $x>=$y 如果$x大于等于$y返回1否则返回0
< $x<$y 如果$x小于$y返回1否则返回0
<= $x<=$y 如果$x小于等于$y返回1否则返回0
== $x==$y 如果$x等于$y返回1否则返回0
!= $x!=$y 如果$x不等于$y返回1否则返回0
<=> $x<=>$y 如果$x大于$y返回1;如果$x等于$y返回0;
如果$x小于$y则返回-1

四、字符串(String Values)运算符

符号 范例 说明
gt $str1 gt $str2 如果$str1大于$str2返回1否则返回0
ge $str1 ge $str2 如果$str1大于等于$str2返回1否则返回0
lt $str1 lt $str2 如果$str1小于$str2返回1否则返回0
le $str1 le $str2 如果$str1小于等于$str2返回1否则返回0
eq $str1 eq $str2 如果$str1等于$str2返回1否则返回0
ne $str1 ne $str2 如果$str1不等于$str2返回1否则返回0
cmp $str1 cmp $str2 如果$str1大于$str2返回1;如果$str1=$str2返回0;
如果$str1小于$str2则返回-1

五、逻辑(Logical)运算符
1.$x && $y(AND)

$x $y 结果
真(True) 真(True) 真(True)
真(True) 假(False) 假(False)
假(False) 真(True) 假(False)
假(False) 假(False) 假(False)

1.$x || $y(OR)

$x $y 结果
真(True) 真(True) 真(True)
真(True) 假(False) 真(True)
假(False) 真(True) 真(True)
假(False) 假(False) 假(False)

1.! $x(Not)

$x 结果
真(True) 假(False)
假(False) 真(True)

六、其他运算符

指令: ..区域运算符(Range Operator)
说明: 这个运算符是Perl语言中特别有用运算符且很实用。
范例:    
  @digits=(1..9); #这时@digits=(1,2,3,4,5,6,7,8,9);
  @digits=('01'..'05'); #这时@digits=(01,02,03,04,05);
  @char=('A'..'E'); #这时@char=(A,B,C,D,E);
  @total=(1..3,'A'..'B'); #这时@totalr=(1,2,3'A','B');

 

指令: 判断运算式?运算式1:运算式2条件运算符
说明: 这个运算符的意义和C语言一样,如果判断运算式的值是真的
话,则做运算1的运算,如果判断运算式是假的话,则做运算式
2的运算。
范例:    
  $price=($age>60)?100:200;
  如果$age大于60的话,则$price等于100;否则$price等于200。

七、常用的文件数据(File test)运算符

范例 说明
-r $file 如果$file是可读取的话,返回1的值
-w $file 如果$file是可写入的话,返回1的值
-x $file 如果$file是可执行的话,返回1的值
-e $file 如果$file存在的话,返回1的值
-o $file 如果$file是被执行者所拥有的话,返回1的值
-s $file 返回$file的文件大小(bytes)
-f $file 如果$file是正常文件的话,返回1的值
-t $file 如果$file是文本文件的话,返回1的值
-b $file 如果$file是binary文件的话,返回1的值
-m $file 返回文件最后一次更改时间到现在的日期数

好不容易看完本文了,你一定有收获了吧。
perl5 运算符相关内容,暂时为大家介绍到这里了。祝你在学习 perl 的道路上,更进一步。

您可能感兴趣的文章:
perl运算符用法详解
有关perl的标量和运算符的一些知识
了解perl尖括号运算符(<>)