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