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