RosettaCodeData/Task/Loops-N-plus-one-half/Perl/loops-n-plus-one-half-2.pl

print join(', ', 1..10), "\n";