Help for this page

Select Code to Download

Select or download this

my @pos;

...
    
    $start = $pos;
}

Select or download this

my $i = 1;
    
...
    
push @pos, [$start, $start + $i-1];