my @ints  = 1..3;
my @evens = my_map { $_ *= 2 } @ints;
print "@evens\n";
print "@ints\n";
__END__
2 3 6
2 3 6