Perl6 -1.2 操作符

来源：互联网发布：c wpf 数据绑定编辑：程序博客网时间：2024/06/01 09:51

1、数值操作符

1.1 rand 产生随机数

用法：

种子.rand

例如：

my $rand = 1.rand;

say "$rand"; #0.7548;

1.2 $x++/++$x 自加1，单独使用无区别。

用法：

$x++;

++$x;

例如：

my $x = 1;

my $y = 0;

$x++;

say "$x"; # 2

++$x;

say "$x"; #3

$y=$x++;

say "$y"; #3

$y=++$x;

say "$y"; #4

1.3 $x**2 平方

用法：

$x**2 (==$x*$x)

例如：

my $x=4;

my $y= $x**2;

say "$y"; #16;

1.4 ?|! 逻辑前辍

用法：

?$x / !$x

例如：

my $x=1;

say "{!$x}"; #FALSE;

$x =0;

say "{!$x}"; #True;

1.5 +/-/*/-=/+=/*=//=/ 加减乘除

用法：

$x+$y; $x-$y; $x*$y; $x/$y;$x-=$y; $x+=$y; $x*=$y; $x/=$y;

例如：

my $x = 1;

my $y =2;

my $A=$x+$y;

my $B=$x-$y;

my $C=$x*$y；

my $D=$x/$y;

say "$A,$B,$C,$D"; # 3,-1,2,0.5;

1.6 x 重复

用法：

$a x 数字;

例如：

my $a = 0;

my $b = $a x 3;

say "$b"; #000;

1.7 ~ 连接符

用法：

$x ~"字符";

例如：

my $x = "TEST";

my $y = $x ~"-TEXT";

say "$y"; #TEST-TEXT;

1.8 == 相等

用法：

$x == $y;

例如：

my $x = 2;

my $y = 2;

if ($x == $y) { say "Ture";}

1.9 = 赋值；

2、字符串表达式

1.1 eq 相等（对应数值 ==）

用法：

$x eq $y;

例如：

my $x = 1;

my $y = 1;

if ($x == $y){ say "True"; }

my $a = "T";

my $b = "Y";

if ($a eq $b){ say "True";}

1.2 ne 不等于(!=)

1.3 !eq 不等于(!==)

1.3 lt 小于(<)

1.4 le 小于等于(<=)

1.5 gt 大于(>)

1.6 ge 大于等于(>=)

3、逻辑表表式

1.1 条件表达式

用法：

condition??True!!False (condition?True:False)

例如：

my $x = 1;

my $y =2;

$x == $y??(say "1")!!(say ”0“); # 0；

1.2 && 逻辑与

1.3 || 逻辑或

1.4 ！逻辑非

4、智能匹配

1 、~~双波浪（Perl5中也存在此操作符）

用法：

$x ~~ $y;

例如：

my $x = "TEST";

if ($x ~~ "TEST"){ say "TRUE\n";}

0 0