sub use_from {
    no strict 'refs';
    no warnings 'redefine';
    my $package = shift;
    *{ $_ } = *{ "$package\::$_" }{CODE} for @_;
}