Select Code to Download

use strict;
use warnings;
...
@array = (1,2,3,4,5);
@array = map{$_+5}@array;
print "@array\n"; #6 7 8 9 10