A instrução if na linguagem Perl é usada para realizar operações com base na condição. Usando a instrução if-else, você pode executar a operação com qualquer condição verdadeira ou falsa. Perl suporta vários tipos de instruções if:
- Se
- Caso contrário
- Se mais-se
Perl se exemplo
A instrução if única do Perl é usada para executar o código se a condição for verdadeira. A sintaxe da instrução if é fornecida abaixo:
if(expression){ //code to be executed }
Fluxograma da instrução if em Perl
Vamos ver um exemplo simples de instrução if da linguagem Perl.
$a = 10; if( $a %2==0 ){ printf 'Even Number '; } }
Saída:
Even Number
Aqui, a saída é um número par, pois demos a entrada como 10.
Exemplo If-else em Perl
A instrução Perl if-else é usada para executar um código se a condição for verdadeira ou falsa. A sintaxe da instrução if-else é fornecida abaixo:
if(expression){ //code to be executed if condition is true }else{ //code to be executed if condition is false }
Fluxograma da instrução if-else em Perl
Vamos ver o exemplo simples de números pares e ímpares usando a instrução if-else na linguagem Perl.
$a = 10; if( $a %2==0 ){ printf 'Even Number '; }else{ printf 'Odd Number '; }
Saída:
Even Number
Aqui, a entrada é um número par e, portanto, a saída é par.
Exemplo Perl If-else com entrada do usuário
Neste exemplo, receberemos a entrada do usuário usando a entrada padrão (/).
print 'Enter a Number? '; $num = ; if( $num %2==0 ){ printf 'Even Number '; }else{ printf 'Odd Number '; }
Saída:
Enter a Number? 5 Odd Number
Enter a Number? 4 Even Number
Na primeira saída, o usuário digitou o número 5, que é ímpar. Portanto, a saída é estranha.
Na segunda saída, o usuário digitou o número 4, que é par. Portanto, a saída é par.
Perl If else-if Exemplo
A instrução Perl if else-if executa um código a partir de várias condições. A sintaxe da instrução if else-if é fornecida abaixo:
if(condition1){ //code to be executed if condition1 is true }else if(condition2){ //code to be executed if condition2 is true } else if(condition3){ //code to be executed if condition3 is true } ... else{ //code to be executed if all the conditions are false }
Fluxograma da instrução if else-if em Perl
O exemplo da instrução if else-if na linguagem Perl é fornecido abaixo.
print 'Enter a Number to check grade '; $num = ; if( $num 100){ printf 'Wrong Number '; }elsif($num >= 0 && $num = 0 && $num = 60 && $num = 70 && $num = 80 && $num = 90 && $num <= 100){ printf 'a+ grade '; } < pre> <p>Output:</p> <pre> Enter a Number to check grade 66 C Grade </pre> <pre> Enter a Number to check grade 2 Wrong Number </pre></=>
Enter a Number to check grade 2 Wrong Number=>