Select Code to Download

package Foo;
use UtilityClass;
...
    my $self = shift;
    $self->UtilityClass::some_method(@_);
}

package Foo;
use UtilityClass;
...
sub some_method {
    goto &{ $_[0]->helper_class->can('some_method') };
}