Perl 6 Syntax: for loop

$count = 1;
while $count < 10 {
  say $count;
  $count++;
}