package My_Package;
use Moose;


sub routine {
    ...
}


sub abcd {
	...
	routine();
	...
}

sub efgh {
	...
	routine();
	...
}