| for ( | condizione iniziale; condizione finale; incremento) { |
| blocco di istruzioni | |
| } | |
Nell'esempio seguente viene utilizzato un ciclo for per stampare tutti gli elementi di un array.
#!/usr/local/bin/perl
@frutta = ("mele", "pere", "pesche", "albicocche");
for ($i=0; $i<=$#frutta; $i++) {
print "$frutta[$i]\n";
}
La variabile contatore $i assume inizialmente il valore 0, viene incrementata ad ogni ciclo di 1, fino a quando non raggiunge il valore pari al numero di elementi dell'array @frutta (ricordiamo che questo numero è espresso da $#frutta).
Una struttura di controllo per iterare un blocco di istruzioni, simile alla for, è la foreach, che consente di inserire in una variabile scalare uno dopo l'altro tutti gli elementi di una lista. Il seguente esempio, del tutto equivalente al precedente, ci sarà di aiuto per comprendere il funzionamento di questa istruzione:
#!/usr/local/bin/perl
@frutta = ("mele", "pere", "pesche", "albicocche");
foreach $frutto (@frutta) {
print "$frutto\n";
}
Ad ogni iterazione del ciclo la variabile scalare $frutto assume un
valore pari a quello dell'elemento ``corrente'' della lista @frutta.