Try use vars qw//;. For example:

#!/usr/bin/perl

package fred;
use strict;

use vars qw/$test1 $test2/;
$test1 = "foo";
$test2 = "frobizten";

package main;

print "test1 from fred is: $fred::test1\n";
print "test2 from fred is: $fred::test2\n";
[download]

The use vars pragma(?) is better replaced with our in later version of Perl but works in Perl 5.005 which is great for backwards compatibility. :)

I don't have any advice for why your require isn't working except that I generally advise people to stay away from require. It's a general rule, and sometimes best broken, but every script I've ever had to maintain, that has relied on require hasn't been strict compliant either.

Hope it helps.

jarich