[ActivePerl] 7. 산술 연산자.

이 강의는 MPPC (미소녀 & PocketPC)의 Pure Ani에게 저작권이 있습니다.

수치 계산에 사용하는 연산자입니다.
덧셈 (+) : 예시 $a = $b + $c ($a에 $b와 $c를 더한값을 넣습니다.)
뺄셈 (-) : 예시 $a = $b - $c ($a에 $b와 $c를 뺀값을 넣습니다.)
곱셈 (*) : 예시 $a = $b * $c ($a에 $b와 $c를 곱한값을 넣습니다.)
나눗셈 (/) : 예시 $a = $b / $c ($a에 $b와 $c를 나눈값을 넣습니다.)

위의 수치 계산 연산을 응용한 연산자입니다.
+= : 예시 $a += $b ($a = $a + $b와 동일)
-= : 예시 $a -= $b ($a = $a - $b와 동일)
*= : 예시 $a -= $b ($a = $a * $b와 동일)
/= : 예시 $a -= $b ($a = $a / $b와 동일)

대입없이 하나의 변수값을 증가시키거나, 감소시킵니다.
++ : 예시 $a++ ($a = $a + 1와 동일)
-- : 예시 $a-- ($a = $a - 1와 동일)

참고로 $a++ 의 경우는 해당 명령문 라인 다음에서야 적용이 됩니다.
하지만 ++$a의 경우는 해당 명령문은 라인에서 증가가 적용됩니다.

예시를 모두 테스트 해본 결과입니다.

위의 테스트에 사용한 명령문입니다.
$a = 1;
$b = 4;
$c = 2;

printf('$a = %d, $b = %d, $c = %d',$a,$b,$c);
print "\n";

printf('$a = $b + $c : %d = %d + %d',$b+$c,$b,$c);
print "\n";
printf('$a = $b - $c : %d = %d - %d',$b-$c,$b,$c);
print "\n";
printf('$a = $b * $c : %d = %d * %d',$b*$c,$b,$c);
print "\n";
printf('$a = $b / $c : %d = %d / %d',$b/$c,$b,$c);
print "\n";

printf('$a += $b : %d += %d : ',$a,$b);
printf("%d\n",$a+=$b);
printf('$a -= $b : %d -= %d : ',$a,$b);
printf("%d\n",$a-=$b);
printf('$a *= $b : %d *= %d : ',$a,$b);
printf("%d\n",$a*=$b);
printf('$a /= $b : %d /= %d : ',$a,$b);
printf("%d\n",$a/=$b);

printf('$a++ : %d++ : ',$a);
printf("%d\n",++$a);
printf('$a-- : %d-- : ',$a);
printf("%d\n",--$a);

작성자 Pure Ani
출　처 MPPC (미소녀 & PocketPC)