Select Code to Download

    while (<>) {
        $obj.threshold += $_
            unless $obj.threshold > $min;
    }

    my $thresh := $obj.threshold;
    while (<>) {
        $thresh += $_
            unless $thresh > $min;
    }