Statement Perl

foreach (1 .. 10) {
  print;
}