package Mod; sub foo { print "Output: @_\n"; } sub import { my ($pkg, %options) = @_; __PACKAGE__->foo(arg => $options{-arg}); } 1; #### > perl -e 'use Mod -arg => "custom";' Output: Mod arg custom