インスタンス変数について教えてほしいのですが、モジュール内で使用しているインスタンス変数を、別のモジュール
で使用する場合どうしたらいいのでしょうか？

例えば、下の例でいくと$testは空白のままです。
fooの所でhoge->new();を追加すると11が帰ってくるのですが、
このようにしないと、インスタンス変数は使えないのですか？

package main;
my $hoge=hoge->new();
my $foo=foo->new();

package hoge;
sub new {
my $class = shift;
my $define = {};
$define->{'BUZ'} = '11';
bless $define,$class;
}
sub GetBuz {
my $self = shift;
return $self->{'BUZ'};
}

package foo;
use base hoge;
sub new {
my $class = shift;
my $define = {};
bless $define,$class;
my $test = $define->GetBuz;
print "$test";
}