$self->sub($var);

##</code><code>##

my %message_types	= (
        type1   => \&{$self->sub_1},
        type2   => \&{$self->sub_2},
	);

##</code><code>##

my %message_types          = (
        type_1  => \&MY::Fully::Qualified::Package::Name::sub1,
        type_2  => \&MY::Fully::Qualified::Package::Name::sub2,
);