Select Code to Download

print map { $_, $_, $_ } (1, 2, 3); #111222333
print map { ($_) x $_  } (1, 2, 3); #122333

print map { $_, ' ') } (1, 2, 3); #1 2 3

print map { $_ => ' ' } (1, 2, 3); #1 2 3