foreach (@foo) { $_++; # Add 1 to each member of @foo } #### foreach my $bar (@foo) { $bar++; }