sub routine {
    my $input_ref = {@_};
    my $do_this   = $input_ref->{do_this} || 1;
}