[ create a new paste ] login | about

Link: http://codepad.org/XjxLeaVq    [ raw code | output | fork ]

Perl, pasted on Jul 6:
1
2
3
4
local ($, , $\) = (', ', "\n"); # for print
my @array = (0..6);
for my $i (@array) { $i++ };
print @array;


Output:
1
1, 2, 3, 4, 5, 6, 7


Create a new paste based on this one


Comments: