print $data{$moji}->[0];
print $data{$moji}->[1];

これでわかっただろ。