Help for this page
my $sum = 0; $sum += $_ for @list;
print sub { (map {splice @_, 0, 2, $_[0] + ($_[1] // 0)} @_)[-1] }-> ( +1,2,3,4,5);
www.com | www.net | www.org
No recent polls found