perl操作符详细说明

转载 2013年12月03日 14:49:43

zz : http://www.jb51.net/article/12780.htm


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

Table 3.1. 整数比较操作符

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


操作符<=>结果为:
  0 - 两个值相等
  1 - 第一个值大
  1 - 第二个值大
三、字符串比较操作符 

Table 3.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.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 3.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;


.=可在一个赋值语句中出现多次,如:
  $value1 = $value2 = "a string";
.=作为子表达式
  ($a = $b) += 3;
  等价于
  $a = $b;
  $a += 3;
  但建议不要使用这种方式。
七、自增自减操作符 :++、--(与C++中的用法相同)
.不要在变量两边都使用此种操作符:++$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++; 
八、字符串联结和重复操作符 
  联接: .
  重复:x
  联接且赋值(类似+=): .=
例:
  $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 3.6. 操作符次序

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

.操作符结合性(associativity):

Table 3.7. 操作符结合性

操作符 结合性
++--
-~! Right-to-left
** Right-to-left
=~!~ Left-to-right
*/%x Left-to-right
+-. Left-to-right
<<>> Left-to-right
-e-r,
<<=>>=ltlegtge Left-to-right
==!=<=>eqnecmp 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
orxor Left-to-right



建议:
  1、当你不确定某操作符是否先执行时,一定要用括号明确之。
  2、用多行、空格等方式提高程序的可读性。


Perl 操作符

算术运算操作符: 运算符                     说明                   举例                + 加法 $a + $b - 减法  $...
  • u011641885
  • u011641885
  • 2015年05月27日 16:12
  • 500

Perl中一种有趣输入的方法,钻石操作符<>

Perl中一种有趣输入的方法,钻石操作符 例子: 点击(此处)折叠或打开 [root@zsd script]# cat ex1_2.pl #!/us...
  • mydriverc2
  • mydriverc2
  • 2014年12月16日 14:23
  • 1499

perl字符串操作符

.操作符点操作符用于连接字符串,例如:my $string1 = "i love "; my $string2 = "china \n";print $string1 . $string2;运行结果:...
  • xiao3404
  • xiao3404
  • 2017年12月03日 12:48
  • 305

perl学习笔记三----操作符

 操作符perl的操作符大部分跟C语言相同,所以下面还是介绍一些不相同的地方。一。 操作符1。乘幂 **例如 2**3 ----8乘幂不可以超过系统的表示范围否则报错。2。数字比较例如 ab若 a>b...
  • yc0188
  • yc0188
  • 2007年05月28日 12:50
  • 1382

perl 5.10新特性智能匹配操作符合~~介绍

~~ 操作符号的 使用。
  • bruce_wang_janet
  • bruce_wang_janet
  • 2011年02月14日 10:56
  • 1406

perl文件测试操作符

perl文件测试操作符操作符含义-r 文件可以被有效的UID/GID读取。-w 文件可以被有效的UID/GID写入。-x 文件可以被有效的UID/GID执行。-o 文件被有效UID所有-R 文件可以被...
  • zxianyong
  • zxianyong
  • 2010年09月12日 13:03
  • 1941

perl 高级操作符 <=>

1.升序排序 @number=qw/5 10 15 3 2 4 8 6/; my @descending =sort {$a$b} @number;                      ...
  • lyj1101066558
  • lyj1101066558
  • 2016年03月17日 20:33
  • 102

perl: scalar

1.对于整数型literal,可以使用下划线分开,但其实还是同一个值,如:6987654321698_765_432_1代表同一个literal值。对于八进制和16进制数也是同样使用这种方法。 2.p...
  • zhangbg
  • zhangbg
  • 2010年06月19日 10:58
  • 6730

Perl操作符

这里列几个不常用的Perl操作符备忘。 $test ||=2; 如果$test的布尔值为false,就赋值为2 my $test3 ="abc"; $test3 x=3; 重复$test...
  • cgjkjk
  • cgjkjk
  • 2013年12月17日 11:41
  • 477

perl .= 操作符

[root@master Webqq]# cat k4.pl $a=3; $b=4; print "\$a is $a\n"; print "\$b is $b\n"; $a .=$b; print...
  • zhaoyangjian724
  • zhaoyangjian724
  • 2015年09月11日 14:23
  • 241
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:perl操作符详细说明
举报原因:
原因补充:

(最多只允许输入30个字)