my @b = map { $_ + 2 } @elem;
# vs
my @b;
for ( @elem ) { push @b, $_ + 2; }

# -> results:
#             Rate       map       for
# map       60.3/s        --      -23%
# for       78.2/s       30%        --