Input/Output for lines of text: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) m (→{{header|C}}: Remove vanity tags) |
SqrtNegInf (talk | contribs) (Added Perl example) |
||
| Line 420: | Line 420: | ||
return 0; |
return 0; |
||
}</lang> |
}</lang> |
||
=={{header|Perl}}== |
|||
<lang perl>$n = scalar <>; |
|||
do_stuff(scalar <>) for 1..$n; |
|||
sub do_stuff { print $_[0] }</lang> |
|||
=={{header|Perl 6}}== |
=={{header|Perl 6}}== |
||