For ($count=1;  $count<10;  ++$count) {
    print "count is now $count\n";
}