double each element of an array

   
#!/usr/bin/perl
use warnings;
use strict;
my @array=(10, 20, 30, 40);
print "Before: @array\n";
for (@array) { $_ *= 2 }
print "After: @array\n";

1.	Running through Arrays
2.	Using array length in for loop
3.	Reference two arrays in foreach statement
4.	Using nested for loop to initialize two-dimensional array
5.	Using for loop with array
6.	Using for each with $_ variable
7.	Using foreach to change the value in an array
8.	Loop through a list
9.	Loop through the array and replace every undefined value with an actual value.
10.	Using dereferenced array in foreach loop

double each element of an array : Array Loop « Array « Perl