Nested function: Difference between revisions
Content added Content deleted
(added objc) |
(added perl) |
||
Line 72: | Line 72: | ||
return 0; |
return 0; |
||
}</lang> |
}</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}}== |
=={{header|Python}}== |