Perl, 28
Reads the parameter from stdin.
@x=1..$_,print"@x
"for 1..<>
From the command line:
perl -E'$,=$";say 1..$_ for 1..<>'
but I don't now how to count that (probably between 25 and 29).
nutki
- 3.7k
- 11
- 12