Security Advisories (2)
CVE-2026-64193 (2026-07-20)

Net::DNS versions through 1.55 for Perl allow remote execution injection via EDNS EXTENDED ERROR. Net::DNS::RR::OPT::EXTENDED_ERROR::_decompose parses the EXTRA-TEXT field of an EDNS EXTENDED-ERROR option (RFC 8914) by tokenising the raw bytes and passing the result to Perl's eval. There is some escaping done for $ and @, but not for backticks. This can be exploited for command execution if $pkt->edns->option('EXTENDED-ERROR') is called in array context, for example with a payload of {0:`"<command>"`} in EXTRA-TEXT.

CVE-2026-64194 (2026-07-20)

Net::DNS versions through 1.55 for Perl allow Denial of Service via deep DNS compression pointer chains. Net::DNS::DomainName::decode follows RFC 1035 compression pointers by recursing into itself with no depth limit. It is possible to construct a name which saturates the call stack (at least with larger TCP responses), leading to a potential Denial of Service. The guard `$link < $offset` prevents forward and circular chains, but still allows arbitrarily long backward chains. The per-offset cache (`$cache`) is populated at the start of each call and short-circuits only re-traverses of the same offset - the initial descent through a fresh chain still recurses at full depth. A crafted packet can chain two-byte compression pointers so that each one points two bytes earlier than the previous, producing a chain length of `offset / 2`. For the 14-bit pointer field (max offset 16383) this gives up to ~8191 recursive frames. For a TCP DNS message the limit is the 16-bit length field (~32767 frames). Perl's default C stack handles only a few thousand frames; beyond that the process receives SIGSEGV or similar, which is a denial-of-service for any application parsing untrusted DNS data. The vulnerability is triggered by `Net::DNS::Packet->new(\$wire)` i.e. any point where the library decodes a DNS message from the network.

NAME

Net::DNS::FAQ - Frequently Asked Net::DNS Questions

SYNOPSIS

perldoc Net::DNS::FAQ

DESCRIPTION

This document serves to answer the most frequently asked questions on both the Net::DNS Mailing List and those sent to the author.

The latest version of this FAQ can be found at http://www.net-dns.org/docs/FAQ.html

GENERAL

What is Net::DNS?

Net::DNS is a perl implementation of a DNS resolver.

INSTALLATION

Where can I find Test::More?

Test::More is part of the Test-Simple package, by Michael G Schwern. You should be able to find the distrubution here:

http://search.cpan.org/dist/Test-Simple/

USAGE

Why does Net::DNS::Resolver::query() return undef when the ANSWER section is empty?

The short answer is, don't use query(). Net::DNS::Resolver::send() will always return the answer packet, as long as an answer was received.

The longer answer is that query() is modeled after the res_query() function from the libresolv C library, which has similar behaviors.

VERSION

$Id: FAQ.pod 931 2011-10-25 12:10:56Z willem $