Select Code to Download

use strict;
use warnings;
...
calculation in do_stuff(): 4000
calculation in dangerous(): 500
calculation in do_stuff(): 5000

sub do_stuff1 {
    local $_ = shift;
    chomp;
    say;
}