package testlib; our $var = "Lord only knows if this will work..."; 1; #### # testlib.pm package testlib; use strict; our @EXPORT = qw( $var ); #place all the variables you want to export by default in here (c.f. @EXPORT_OK) use Exporter; our @ISA = qw(Exporter); our $var = "Lord only knows if this will work..."; 1; #### #!/usr/bin/perl -w # test.pl use strict; use CGI::Carp qw(fatalsToBrowser warningsToBrowser); use CGI ':standard'; use testlib; # will automagically import $var into current namespace print "Content-type: text/html\n\n"; print $var; exit;