if, elsif y unless en Perl

Ramificar con if, el elsif de una sola palabra de Perl y unless para el caso negativo.

use strict;
use warnings;

my $hour = 14;
if ($hour < 12) {
    print "morning\n";
} elsif ($hour < 18) {
    print "afternoon\n";
} else {
    print "evening\n";
}

# unless reads as if-not; save it for simple guards
my $queue = 0;
unless ($queue) {
    print "queue is empty\n";
}

Cómo funciona

1. La escalera compara $hour contra el mediodía y las 18:00; las llaves nunca son opcionales.
2. elsif es una sola palabra clave — Perl rechaza tanto else if como elseif.
3. unless ejecuta su bloque cuando la condición es falsa; mejor reservarlo para guardas simples.

Palabras clave y builtins usados aquí

• else
• elsif
• if
• my
• print
• unless
• use

El intento, en números

Líneas

17

Caracteres a escribir

266

Tokens

59

Ritmo de tres estrellas

80 tpm

Al ritmo de tres estrellas de 80 tokens por minuto, este intento toma unos 44 segundos.

Escribe este fragmento

Paso 1 de 3 en Control de flujo; paso 4 de 27 en Fundamentos del lenguaje.

← Anterior Siguiente →