Perl 5 Syntax: foreach loop

foreach my $count (1..9) {
  print "$count\n";
}

• Or:

foreach (1..9) {
  print "$_\n";
}