Anonymous user
Nested function: Difference between revisions
added perl
(added objc) |
(added perl) |
||
Line 72:
return 0;
}</lang>
=={{header|Perl}}==
<lang perl>sub makeList {
my $separator = shift;
my $counter = 1;
sub makeItem { $counter++ . $separator . shift . "\n" }
makeItem("first") . makeItem("second") . makeItem("third")
}
print makeList(". ");</lang>
=={{header|Python}}==
|