perl | Valores booleanos

En la mayor parte del lenguaje de programación, True y False se consideran valores booleanos. Pero Perl no proporciona el tipo booleano para True y False. En general, un programador puede usar el término «booleano» cuando una función devuelve Verdadero o Falso. Como las declaraciones condicionales (if, while, etc.) devolverán verdadero o falso para los valores escalares.

Ejemplo:

# Perl Code to demonstrate the boolean values
 
# variable assigned value 0
$k = 0;
 
# checking whether k is true or false
if ($k)
{
    print "k is True\n";
}
else
{
    print "k is False\n";
}
 
# variable assigned value 2
$m = 2;
 
# checking whether m is true or false
if ($m)
{
    print "m is True\n";
}
else
{
    print "m is False\n";
}

Producción: 

k is False
m is True

Valores verdaderos: cualquier número distinto de cero, es decir, excepto cero, son valores verdaderos en el lenguaje Perl. Constantes de string como ‘verdadero’ , ‘falso’ , ‘ ‘ (string que tiene un espacio como carácter), ’00’ (2 o más caracteres 0) y «0\n» (un cero seguido de un carácter de nueva línea en la string), etc. Considere también los valores verdaderos en Perl.

• Ejemplo: 

# Perl Code to demonstrate the True values
 
# variable assigned value 5
$a = 5;
 
# checking whether a is true or false
if ($a)
{
    print "a is True\n";
}
else
{
    print "a is False\n";
}
 
# string variable assigned white
# space character
$b = ' ';
 
# checking whether b is true or false
if ($b)
{
    print "b is True\n";
}
else
{
    print "b is False\n";
}
 
# string variable assigned 'false'
# value to it
$c = 'false';
 
# checking whether c is true or false
if ($c)
{
    print "c is True\n";
}
else
{
    print "c is False\n";
}
 
# string variable assigned "0\n"
# value to it
$d = "0\n";
 
# checking whether d is true or false
if ($d)
{
    print "d is True\n";
}
else
{
    print "d is False\n";
}

Producción: 

a is True
b is True
c is True
d is True

Valores falsos: una string vacía o una string que contiene un solo dígito 0 o un valor indefinido y cero se consideran valores falsos en perl.

• Ejemplo: 

# Perl Code to demonstrate the False values
 
# variable assigned value 0
$a = 0;
 
# checking whether a is true or false
if ($a)
{
    print "a is True\n";
}
else
{
    print "a is False\n";
}
 
# string variable assigned empty string
$b = '';
 
# checking whether b is true or false
if ($b)
{
    print "b is True\n";
}
else
{
    print "b is False\n";
}
 
# string variable assigned undef
$c = undef;
 
# checking whether c is true or false
if ($c)
{
    print "c is True\n";
}
else
{
    print "c is False\n";
}
 
# string variable assigned ""
# value to it
$d = "";
 
# checking whether d is true or false
if ($d)
{
    print "d is True\n";
}
else
{
    print "d is False\n";
}

Producción: 

a is False
b is False
c is False
d is False

Nota: Para la verificación condicional en la que el usuario tiene que comparar dos variables diferentes, si no son iguales, devuelve False ; de ​​lo contrario , True .

• Ejemplo: 

# Perl Program demonstrate the conditional check
 
# variable initialized with string
$x = "GFG";
 
# using if statement
if ($x eq "GFG")
{
    print "Return True\n";
}
else
{
    print "Return False\n";
}

Producción: 

Return True