Exemple d'opérateurs arithmétiques Perl

Supposons que la variable $ a a 10 et la variable $ b 20, puis les opérateurs arithmatiques Perl sont les suivants:

N ° Sr.	Opérateur et description
1	+ ( Addition ) Ajoute des valeurs de chaque côté de l'opérateur Example - $ a + $ b donnera 30
2	- (Subtraction) Soustrait l'opérande de droite de l'opérande de gauche Example - $ a - $ b donnera -10
3	* (Multiplication) Multiplie les valeurs de chaque côté de l'opérateur Example - $ a * $ b donnera 200
4	/ (Division) Divise l'opérande de gauche par l'opérande de droite Example - $ b / $ a donnera 2
5	% (Modulus) Divise l'opérande de gauche par l'opérande de droite et renvoie le reste Example - $ b% $ a donnera 0
6	** (Exponent) Effectue un calcul exponentiel (puissance) sur les opérateurs Example - $ a ** $ b donnera 10 à la puissance 20

Exemple

Essayez l'exemple suivant pour comprendre tous les opérateurs arithmatiques disponibles en Perl. Copiez et collez le programme Perl suivant dans le fichier test.pl et exécutez ce programme.

#!/usr/local/bin/perl
 
$a = 21;
$b = 10;

print "Value of \$a = $a and value of \$b = $b\n";

$c = $a + $b;
print 'Value of $a + $b = ' . $c . "\n";

$c = $a - $b;
print 'Value of $a - $b = ' . $c . "\n";

$c = $a * $b;
print 'Value of $a * $b = ' . $c . "\n";

$c = $a / $b;
print 'Value of $a / $b = ' . $c . "\n";

$c = $a % $b;
print 'Value of $a % $b = ' . $c. "\n";

$a = 2;
$b = 4;
$c = $a ** $b;
print 'Value of $a ** $b = ' . $c . "\n";

Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -

Value of $a = 21 and value of $b = 10
Value of $a + $b = 31
Value of $a - $b = 11
Value of $a * $b = 210
Value of $a / $b = 2.1
Value of $a % $b = 1
Value of $a ** $b = 16