use strict;
use 5.6.0;

package MyModule;

use Exporter;
our @ISA=qw(Exporter);

our @EXPORT_OK = qw(foo bar);

my $var1 = "Some value";

sub foo {
    ... # Maybe use $var1 here...
}

sub bar {
    ... # If not, use $var1 here.
}

1;