my @x = (1..10); foreach (@x) { $_ += 100; } print "@x"; OUTPUT: 101 102 103 104 105 106 107 108 109 110