>>474
なるほど!!　リファレンスに含まれる配列の総数は (0..@{$ref->{data}}-1) で取得すればよかったんですね。
map か grep で代入処理をすればいいのだろうところまでは見当がついてたんですが、対象をどうすればいいか悩んでいました。
ありがとうございました。
頭良すぎです。
俺が馬鹿すぎなのかなー…。