for my $number ( 1 .. 10 ) {
    print $number;
}