$lifeguard->run_on_start(
    sub {
        my $kid = pop;
        print "\nThe lifeguard waves $kid into the pool\n";
    }
);