Esempio di operatori logici Perl

Ci sono i seguenti operatori logici supportati dal linguaggio Perl. Supponiamo che la variabile $ a sia vera e la variabile $ b sia falsa allora -

Sr.No.	Operatore e descrizione
1	and Chiamato operatore AND logico. Se entrambi gli operandi sono veri, la condizione diventa vera. Example - ($ a e $ b) è falso.
2	&& L'operatore AND logico in stile C copia un po 'nel risultato se esiste in entrambi gli operandi. Example - ($ a && $ b) è falso.
3	or Chiamato Operatore OR logico. Se uno dei due operandi è diverso da zero, la condizione diventa vera. Example - ($ a o $ b) è vero.
4	|| L'operatore OR logico in stile C copia un bit se esiste nell'operando eather. Example - ($ a || $ b) è vero.
5	not Chiamato operatore NOT logico. Utilizzare per invertire lo stato logico del suo operando. Se una condizione è vera, l'operatore NOT logico la renderà falsa. Example - not ($ a and $ b) è vero.

Esempio

Prova il seguente esempio per comprendere tutti gli operatori logici disponibili in Perl. Copiare e incollare il seguente programma Perl nel file test.pl ed eseguire questo programma.

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

Quando il codice sopra viene eseguito, produce il seguente risultato:

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