Ejemplo de operadores aritméticos de Perl

Suponga que la variable $ a tiene 10 y la variable $ b tiene 20, luego los siguientes son los operadores aritmáticos de Perl:

No Señor. Operador y descripción
1

+ ( Addition )

Agrega valores a ambos lados del operador

Example - $ a + $ b dará 30

2

- (Subtraction)

Resta el operando de la mano derecha del operando de la mano izquierda

Example - $ a - $ b dará -10

3

* (Multiplication)

Multiplica los valores a ambos lados del operador

Example - $ a * $ b dará 200

4

/ (Division)

Divide el operando de la izquierda por el operando de la derecha

Example - $ b / $ a dará 2

5

% (Modulus)

Divide el operando de la izquierda por el operando de la derecha y devuelve el resto

Example - $ b% $ a dará 0

6

** (Exponent)

Realiza cálculos exponenciales (potencia) en los operadores

Example - $ a ** $ b dará 10 elevado a la potencia 20

Ejemplo

Pruebe el siguiente ejemplo para comprender todos los operadores aritmáticos disponibles en Perl. Copie y pegue el siguiente programa Perl en el archivo test.pl y ejecute este programa.

#!/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";

Cuando se ejecuta el código anterior, produce el siguiente resultado:

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