とりあえずData::Dumperで$resの値を晒してもらうのがいいんじゃないか?