package MYPACKAGE;

use Exporter;
use vars qw / $VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS /;
$VERSION = 1.0;
@ISA = qw/ Exporter /;
@EXPORT = ();
@EXPORT_OK = qw / sub1 /;
%EXPORT_TAGS = ( DEFAULT => [ qw / sub1 / ] );

use strict;

my $var1 = "DEFUALT I WANT TO CHANGE";
sub sub1 {
	print "var1 = $var1\n";
}

1;