Mega Code Archive
Categories
/
Perl
/
String
Join the mapped value
print join(", ", (map {my $value = $_; $value += 1} 1, 2, 3));