演算子

if ($a ge $b) # 文字列比較 eq ne cmp lt gt le ge
if ($a == $b) # 数値比較　 == != <=> < > <= >=
if ( !( $num % 2 == 0 ) ) {
print "奇数です¥n";
}
# AND OR
( ( $x != 7 ) and ( $x > $y ) ); # AND,OR
# 文字列連結
$x = "filename";
$x .= "123"; # filename123
# インクリメント
$a++; # $a=$a+1
# switch文の働き
SWITCH: {
if (/^abc/) { $abc = 1; last SWITCH; }
if (/^def/) { $def = 1; last SWITCH; }
if (/^xyz/) { $xyz = 1; last SWITCH; }
$nothing = 1;
}