Select Code to Download

use bignum (p=>1);

...
    print "i=$i\n";
    
}

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

my $i = 10;
        print "1 i=$i\n";
...
        print "7 i=$i\n";
$i = $i + 6 ;
        print "8 i=$i\n";

1 i=10
2 i=10
...
6 i=10
7 i=20
8 i=30