print map { 1, 2 }, @l;
print map { "$_", 2 }, @l;