## Fixed-length  Loop

my $i=6;
for (0..$i) {
        print ;
        $i++;
}


#### Infinite Loop

my @nums = 1..3;
for (@nums) {
        push  @nums, $_;
        print;
}