$query = $res->search($term, "PTR") || return;
    for $rr ($query->answer) {
            push @answers, $rr->ptrdname;
    }