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