Select Code to Download

use strict;
use warnings;
...
        $self->$sub2( $self->$sub2 + $_ ) for 0..10_000;
    },
};