1package Mixin::Foo; 2use strict; 3use warnings; 4 5sub register_method { 6 +{ 7 foo => sub { 'foo' }, 8 }; 9} 10 111; 12