package includee; use strict; use warnings; use Exporter qw( import ); # I prefer to use `@EXPORT_OK` # and list the imported things # in the `use` statement. our @EXPORT = qw( $SHAREDVARIABLE1 @SHAREDVARIABLE2 %SHAREDVARIABLE3 function ); # Using `use vars` is ok, but dated. our $SHAREDVARIABLE1; our @SHAREDVARIABLE2; our %SHAREDVARIABLE3; sub function { ... } 1; # Modules must end with a true value. #### use FindBin qw( $RealBin ); use lib $RealBin;