for (my $i = 0; $i < 6; $i++) {
    print "Hello world, $i\n";
}