my $return = my::module::exit_routine();

sub reverse_modifier {
# I modify default behaviour of the exit routine if I get passed - some times I am not needed. 
}

my %modifier = ( reverse_modifier => \&reverse_modifier );
my $return = my::module::exit_routine(\%modifier);