Perl script to verify DNSSEC

Simple script that verify DNSKEY and DS, RRSIG record for A/AAAA record in the zone. Using should be following #!/usr/bin/perl -w printf check_dnssec_ds("[login to view URL]"); printf check_dnssec_a("[login to view URL]"); printf check_dnssec_aaaa("[login to view URL]"); returns 0/1 depend on whether the record in zone is valid or not. Extra information describing what is wrong can be returned by this function. It is expected that functions will uses Net::DNS module ([login to view URL]~olaf/Net-DNS-SEC-0.16/[login to view URL]). Using of other module is allowed in case what Net::DNS won't be suitable.