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