Help for this page
sub my_map { my $special_thingy = shift; ... apply($special_thingy, $item); } }
my ($special_thingy, @list_of_items) = @_;
sub my_map { foreach my $item (@_[1 ..$#_]) { apply($_[0], $item); } }
sub my_map { for (my $i = 1; $i < @_; $i++) { apply($_[0], $_[$i]); } }
www.com | www.net | www.org
No recent polls found