#for (initialization; expression; continue) {
#    # ...
#}


#!/usr/bin/perl -w

for ($i = 0; $i < 10; $i++) {
   print "Iteration $i.\n";
}