Perl - Operatory liczbowe
Operatory liczbowe.
Oto najważniejsze operacje (nb. większość z nich pochodzi z języka C), jakim możemy poddać zmienne liczbowe:
$x = 4 + 2; # dodawanie # (w wyniku $x = 6) $x = 4 - 2; # odejmowanie # (w wyniku $x = 2) $x = 4 * 2; # mnożenie # (w wyniku $x = 8) $x = 4 / 2; # dzielenie # (w wyniku $x = 2) $x = 4 ** 2; # potęgowanie # (w wyniku $x = 16) $x = 4 % 2; # reszta z dzielenia # (w wyniku $x = 0)
Następujące operatory służą do automatycznego zwiększania lub zmniejszania wartości zmiennych:
++$a; # zwiększenie $a o jednostkę # i zwrócenie wartości $a++; # zwrócenie wartości $a i # zwiększenie jej o jednostkę --$a; # zmniejszenie $a o jednostkę # i zwrócenie wartości $a--; # zwrócenie wartości $a i # zmniejszenie jej o jednostkę
Warto tutaj nadmienić, iż operator inkrementacji może zostać użyty także względem zmiennych łańcuchowych. W takim przypadku cyfry zmniejszają się lub zwiększają, litery zaś zostają odpowiednio przesunięte w alfabecie.
A oto przykłady innych, przeznaczonych do działania na łańcuchach operatorów:
$a = 'Lin'; # "sklejenie" dwóch $b = 'ux'; # łańcuchów - $c = $a . $b; # zmienna $c w efekcie # zawierać będzie słowo # "Linux" $a = 'masło'; # zmienna $c będzie $b = 10; # zawierać $c = $a x $b; # łańcuch złożony z # dziesięciu # "sklejonych" łańcuchów $a
Ustalać wartości zmiennych możemy na wiele sposobów. Dla przykładu przyjmijmy, że każde z poniższych przypisań jest wykonywane z osobna dla zmiennych $a = 2 i $b = 3:
$a = $b # przypisanie $a do $b # (w wyniku $a = 3, $b = 3) $a += $b # dodanie $b do $a # (w wyniku $a = 5, $b = 3) $a -= $b # odjęcie $b od $a # (w wyniku $a = -1, $b = 3) $a .= $b # dopisanie $b do $a # (w wyniku $a = 23, $b = 3)