my @array = (1..20);

print "$_\n" for @array[0..9];