Perl/Istruzioni particolari su blocchi o etichette: differenze tra le versioni

Questa istruzione consente di terminare "prematuramente" un blocco o una etichetta.

 

last ; # usato un blocco

last <ETICHETTA>; # indica di uscire rispetto quale etichetta

 

;NOTA: Dato che l'uscita prematura da un blocco avviene a seguito di una scelta , si consiglia di leggere quanto riguarda le [[Linguaggio Perl/Le istruzioni/Decisionali|decisionali]] e i [[Linguaggio Perl/Le istruzioni/I cicli|cicli]] per poter comprendere meglio gli esempi.

Vediamo questo esempio:

 

my $b = 15;

my $stop = 17;

}

print "b=$b\n";

che produce:

 

Questa istruzione consente di ritornare allo stesso punto di quando è iniziata l'ultima iterazione.

 

redo ; # usato un blocco

redo <ETICHETTA>; # indica su quale etichetta

 

;NOTA: Dato che l'uscita prematura da un blocco avviene a seguito di una scelta , si consiglia di leggere quanto riguarda le [[Linguaggio Perl/Le istruzioni/Decisionali|decisionali]] e i [[Linguaggio Perl/Le istruzioni/I cicli|cicli]] per poter comprendere meglio gli esempi.

Vediamo questo esempio:

 

my $b = 15;

my $stop = 17;

$b++;

}

che produce :

Questa istruzione consente di "saltare" all'elemento successivo.

 

next ; # usato un blocco

next <ETICHETTA>; # indica su quale etichetta

;NOTA:Dato che l'uscita prematura da un blocco avviene a seguito di una scelta , si consiglia di leggere quanto riguarda le [[Linguaggio Perl/Le istruzioni/Decisionali|decisionali]] e i [[Linguaggio Perl/Le istruzioni/I cicli|cicli]] per poter comprendere meglio gli esempi.

 

Vediamo questo esempio:

 

my $b = 15;

my $stop = 17;

print " etichetta tre (b=$b , r=$ripetizioni)\n";

}

che produce :