1examples(3)           User Contributed Perl Documentation          examples(3)
2
3
4
5$r = $val1->res_query("good-a.test.dnssec-tools.org", "IN", "A"); my ($pkt,
6$err) = new Net::DNS::Packet(\$r); print ($val1->istrusted ?
7           "result is trusted\n" :
8           "result is NOT trusted\n"); $pkt->print;
9

POD ERRORS

11       Hey! The above document had some coding errors, which are explained
12       below:
13
14       Around line 72:
15           =pod directives shouldn't be over one line long!  Ignoring all 7
16           lines of content
17
18       Around line 91:
19           =pod directives shouldn't be over one line long!  Ignoring all 11
20           lines of content
21
22
23
24perl v5.36.0                      2023-01-19                       examples(3)
Impressum