Return to Answer

deleted 1 character in body

Source Link

edited Mar 13, 2015 at 10:35

Perl, 28

Reads the parameter from stdin.

@x=1..$_,print"@x
"for 1..<>

From the command line:

perl -E'say join$"E'$,=$";say 1..$_ for 1..<>'

but I don't now how to count that (probably between 2625 and 3029).

Reads the parameter from stdin.

@x=1..$_,print"@x
"for 1..<>

From the command line:

perl -E'say join$",1..$_ for 1..<>'

but I don't now how to count that (probably between 26 and 30).

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).

Source Link

created Mar 13, 2015 at 10:19

Reads the parameter from stdin.

@x=1..$_,print"@x
"for 1..<>

From the command line:

perl -E'say join$",1..$_ for 1..<>'

but I don't now how to count that (probably between 26 and 30).