>>829を見ました。
つまり、１発で取り出すのは無理で、
リファレンスの配列を作り

my @tmp = hogehoge();
my $hoge1 = $tmp[0];
my %hoge2 = %{$tmp[1]};
my @hoge3 = @{$tmp[2]};

上記のような感じで
取り出せって事で良いですか？