Mega Code Archive

 

Categories / Perl / Statement

 

Using foreach to iterate over an array

@array = ( 1 .. 10 );           # create array containing 1-10 foreach $number ( @array ) {    # for each element in @array    $number **= 2;               # square the value } print "@array\n";