Perl/Istruzioni: differenze tra le versioni

Contenuto cancellato Contenuto aggiunto
Nessun oggetto della modifica
Riga 70:
$b++;
if ( $stop == $b ) { last ETICHETTA_TRE; }
}
print "b=$b\n";
 
che produce:
 
etichetta tre (b=15)
etichetta tre (b=16)
b=17
 
==== Redo ====