Perl/Istruzioni etichetta

Wikibooks, manuali e libri di testo liberi.

[modifica] Etichetta

Le etichette individuano una istruzione o un blocco. Le etichette da sole non servono molto, ma con dei costrutti particolari come goto , redo , next , last è possibile sfruttare meglio le loro potenzialità:

<ETICHETTA>:<istruzione>

<ETICHETTA>:{
            ... istruzioni ...
            }

per esempio è possibile:

 ETICHETTA_UNO: print "etichetta uno\n";
 
 ETICHETTA_DUE: 
 {
    print "etichetta due\n";
 }
 
 my $b = 15;
 ETICHETTA_TRE : while ( $b < 20 )
                 {
                     print " etichetta tre ($b)\n"; 
                     $b++;
                 }

In questo modo un blocco o una istruzione "assume" un nome.Questo non è da confondere con il nome di una funzione.

[modifica] Goto (da non usare)

Come dice il manuale del Perl l'uso del goto non è per nulla consigliato ed è limitato.Il suo uso "mal accettato" è quello di indicare una ETICHETTA.In questo modo il programma "torna" o "va" al punto indicato.Dato che questa istruzione si "sconsiglia" non verrà descritto oltre.