_debug "Got list of DNS TXT records for root domain '$root_domain_name':"
_debug "$reclist"
recid="$(
recline="$(
_value "$reclist"|
grep "<host>${fulldomain}.</host>"|
grep "<value>${txtvalue}</value>"|
grep "<value>${txtvalue}</value>"
)"
_debug "Got line for <host>${fulldomain}.</host> and <value>${txtvalue}</value>:"
_debug "$recline"
recid="$(
_value "$recline"|
sed 's/^.*<id>\([0-9]\{1,\}\)<\/id>.*$/\1/'
)"
_debug "Got id from line:"
_debug $recid
if ! _value "$recid"| grep '^[0-9]\{1,\}$' >/dev/null;then
_err "DNS records for root domain '${root_domain_name}' (Plesk ID ${root_domain_id}) + host '${sub_domain_name}' do not contain the TXT record '${txtvalue}'"