use My::Module qw(call);

call(\&foo);

sub foo { ... };