package RPG::DND; use Exporter; use vars qw(@ISA @EXPORT_OK); @ISA = qw(Exporter); @EXPORT_OK = qw(modifier); sub modifier { int($_[0]/2)-5 }; 1; #### use RPG::DND qw(modifier); # lots of code modifier($value); # lots of other code