Ejemplo de operadores lógicos de Perl

Existen los siguientes operadores lógicos compatibles con el lenguaje Perl. Suponga que la variable $ a es verdadera y la variable $ b es falsa, entonces -

No Señor.	Operador y descripción
1	and Operador llamado lógico AND. Si ambos operandos son verdaderos, entonces la condición se vuelve verdadera. Example - ($ ay $ b) es falso.
2	&& El operador AND lógico de estilo C copia un bit al resultado si existe en ambos operandos. Example - ($ a && $ b) es falso.
3	or Operador OR lógico llamado. Si alguno de los dos operandos es distinto de cero, la condición se cumple. Example - ($ a o $ b) es cierto.
4	\|\| El operador OR lógico de estilo C copia un bit si existe en otro operando. Example - ($ a \|\| $ b) es cierto.
5	not Operador llamado lógico NOT. Use para revertir el estado lógico de su operando. Si una condición es verdadera, el operador NOT lógico la convertirá en falsa. Example - no ($ ay $ b) es cierto.

Ejemplo

Pruebe el siguiente ejemplo para comprender todos los operadores lógicos disponibles en Perl. Copie y pegue el siguiente programa Perl en el archivo test.pl y ejecute este programa.

#!/usr/local/bin/perl
 
$a = true;
$b = false;

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

$c = ($a and $b);
print "Value of \$a and \$b = $c\n";

$c = ($a  && $b);
print "Value of \$a && \$b = $c\n";

$c = ($a or $b);
print "Value of \$a or \$b = $c\n";

$c = ($a || $b);
print "Value of \$a || \$b = $c\n";

$a = 0;
$c = not($a);
print "Value of not(\$a)= $c\n";

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

Value of $a = true and value of $b = false
Value of $a and $b = false
Value of $a && $b = false
Value of $a or $b = true
Value of $a || $b = true
Value of not($a)= 1

↰ Previous page