Help for this page

Select Code to Download


  1. or download this
    our $i_cache;
    for my $i ((defined $i_cache ? $i_cache+1 : 0) .. $#array) {
    ...
        }
    }
    undef $i_cache if $i_cache == $#array; # Reset if we went the whole wa
    +y
    
  2. or download this
    our $i;
    for $i ($i ..10) {
        last if $i == 5;
    }
    print $i;