# script.pl
use feature qw( say );
use Module;
say Module::foo();

##</code><code>##

# Module.pm
package Module;
sub say { "I say \"$_[0]\""; )
sub foo { say "Hi!"; }
1;