for my $i (1 .. 10) {
   print "And a $_,\n";
}