試したらうまいこと出来ました、ありがとうございました☆

勢いでもう一つ質問してしまいますが、複数の配列を返したい場合はどうしたら良いでしょうか？（とりあえず同じように試したらダメでした）
調べてみた所、リファレンスを使って返すとあったのですが、それが最良の方法でしょうか？　↓こんな感じで・・・。

sub foo {
return ＼%hash, ＼@array;
}

いろいろ聞きまくってしまって申し訳ありませんが、よろしくお願いいたします。