Help for this page

Select Code to Download

Select or download this

cbIterator {
    goto STOP if $_ >700;
    print;
} \@nested;
STOP:

Select or download this

#! perl -slw
use strict;
use Data::Dump qw[ pp ];
...
201.338051626486
374.088657613129
stopped after 5 iterations