perl运算符使用介绍与简单应用

perl 5基础教程——运算符

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

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

二、整数比较运算符

Table 1. 整数比较运算符

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

三、字符串比较运算符

Table 2. 字符串比较运算符

四、逻辑运算符

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

五、位运算符

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

六、赋值运算符

Table 3. 赋值运算符

Table 4. 赋值运算符例子

注：
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. 运算符的优先级

运算符结合性(associativity)：

Table 6. 运算符结合性

PERL运算符简单应用

一、赋值（Assignment）运算符

二、运算（Arithmetic）运算符

三、数值（Number Values）运算符

四、字符串（String Values）运算符

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

1.$x || $y(OR)

1.! $x(Not)

六、其他运算符

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

最新评论