Declarações condicionais Perl - IF ... ELSE

As declarações condicionais Perl ajudam na tomada de decisão, que requerem que o programador especifique uma ou mais condições a serem avaliadas ou testadas pelo programa, junto com uma declaração ou declarações a serem executadas se a condição for determinada como verdadeira e, opcionalmente, outras declarações a serem executadas se a condição for considerada falsa.

A seguir está a parte geral de uma estrutura típica de tomada de decisão encontrada na maioria das linguagens de programação -

O número 0, as strings '0' e "", a lista vazia () e undef são todos false em um contexto booleano e todos os outros valores são true. Negação de um valor verdadeiro por! ou not retorna um valor falso especial.

A linguagem de programação Perl fornece os seguintes tipos de instruções condicionais.

Sr. Não.	Declaração e descrição
1	declaração if A if statement consiste em uma expressão booleana seguida por uma ou mais instruções.
2	declaração if ... else A if statement pode ser seguido por um opcional else statement.
3	declaração if ... elsif ... else A if statement pode ser seguido por um opcional elsif statement e então por um opcional else statement.
4	a menos que declaração A unless statement consiste em uma expressão booleana seguida por uma ou mais instruções.
5	a menos ... declaração else A unless statement pode ser seguido por um opcional else statement.
6	a menos ... declaração elsif..else A unless statement pode ser seguido por um opcional elsif statement e então por um opcional else statement.
7	declaração switch Com as versões mais recentes do Perl, você pode usar o switchdeclaração. que permite uma maneira simples de comparar um valor de variável com várias condições.

O ? : Operador

Vamos verificar o conditional operator ? :que pode ser usado para substituir if...elseafirmações. Tem a seguinte forma geral -

Exp1 ? Exp2 : Exp3;

Onde Exp1, Exp2 e Exp3 são expressões. Observe o uso e a localização do cólon.

O valor de um? expressão é determinada assim: Exp1 é avaliada. Se for verdade, então Exp2 é avaliado e se torna o valor de todo? expressão. Se Exp1 for falso, então Exp3 é avaliado e seu valor se torna o valor da expressão. Abaixo está um exemplo simples usando este operador -

#!/usr/local/bin/perl
 
$name = "Ali";
$age = 10;

$status = ($age > 60 )? "A senior citizen" : "Not a senior citizen";

print "$name is  - $status\n";

Isso produzirá o seguinte resultado -

Ali is - Not a senior citizen