📁 File Manager Pro
v10.0.3 | PHP: 7.4.15
Server: Apache/2.4.25 (Debian)
2026-07-02 05:16:02
📂
/ (Root)
/
usr
/
share
/
doc
/
libnet-dns-perl
/
examples
/
demo
📍 /usr/share/doc/libnet-dns-perl/examples/demo
🔄 Refresh
✏️
Editing: example_recurse.pl
Read Only
#!/usr/bin/perl -w # Example usage for Net::DNS::Resolver::Recurse # Performs recursion for a query. use Net::DNS::Resolver::Recurse; my $res = Net::DNS::Resolver::Recurse->new; $res->debug(1); $res->hints("198.41.0.4"); # A.ROOT-SERVER.NET. my $packet = $res->query_dorecursion("www.rob.com.au.", "A"); $packet && $packet->print;
💾 Save Changes
❌ Cancel