File dnswalk-soa-recuse.patch of Package dnswalk

--- dnswalk-2.0.3.2/dnswalk.orig	2022-11-13 15:42:40.897087331 +0100
+++ dnswalk-2.0.3.2/dnswalk	2022-11-13 15:43:25.998568194 +0100
@@ -147,8 +147,7 @@
 sub getmaster {
     my ($zone)=$_[0];
     my ($res) = new Net::DNS::Resolver;
-    my ($packet) = new Net::DNS::Packet($zone, "SOA", "IN");
-    my ($soa_req) = $res->send($packet);
+    my ($soa_req) = $res->send( $zone, 'SOA', 'IN' );
     unless (defined($soa_req)) {
 	&printerr("FAIL", "Cannot get SOA record for $zone:". 
 	    $res->errorstring ."\n");