Bug 445314
| Summary: | perl-Net-DNS: resolver->bgsend() gives unexpected warning | ||
|---|---|---|---|
| Product: | [Fedora] Fedora | Reporter: | Dick Franks <rwfranks> |
| Component: | perl-Net-DNS | Assignee: | Stepan Kasal <kasal> |
| Status: | CLOSED DUPLICATE | QA Contact: | Fedora Extras Quality Assurance <extras-qa> |
| Severity: | low | Docs Contact: | |
| Priority: | low | ||
| Version: | rawhide | CC: | mmaslano, robin.norwood |
| Target Milestone: | --- | ||
| Target Release: | --- | ||
| Hardware: | All | ||
| OS: | Linux | ||
| Whiteboard: | |||
| Fixed In Version: | Doc Type: | Bug Fix | |
| Doc Text: | Story Points: | --- | |
| Clone Of: | Environment: | ||
| Last Closed: | 2008-05-12 10:02:32 UTC | Type: | --- |
| Regression: | --- | Mount Type: | --- |
| Documentation: | --- | CRM: | |
| Verified Versions: | Category: | --- | |
| oVirt Team: | --- | RHEL 7.3 requirements from Atomic Host: | |
| Cloudforms Team: | --- | Target Upstream Version: | |
| Embargoed: | |||
This change was done for 437681 :-/ I reopened related bug and change Net::DNS back to previous state, because this patch maybe fix the previous problem but bring new one. Thanks. Please note that Net::DNS is licensed material, and you MUST NOT make changes without adding a notice to that effect, date and bug reference. Bugs, when you find one, should be logged via CPAN RT. Anything major will receive prompt attention. |
Description of problem: Use of resolver bgsend() method in (Fedora 9-pre) perl-Net-DNS RPM with IPv6 enabled provokes unexpected runtime warning. This behaviour does not occur when using the published Net::DNS CPAN library package. Observed warning is a direct consequence of an ill-considered and unnecessary modification of the resolver Base.pm source. Required prominent notice and date of modification are both absent, contrary to section 2(a) of GPL Version 2, and condition 3 of the Perl Artistic License. Remedy: Ensure that perl-Net-DNS is a verbatim redistribution of the corresponding CPAN library component. Version-Release number of selected component (if applicable): 0.63-3.fc9.i386 How reproducible: 100% Steps to Reproduce: Execute code fragment on machine with IPv6 support #!/usr/bin/perl -w # perl-Net-DNS.i386: resolver->bgsend() gives unexpected warning use Net::DNS; my $resolver=Net::DNS::Resolver->new; my $q=$resolver->bgsend('www.example.com','A'); Actual results: Runtime warning occurs at line 8. Argument "AI_NUMERICHOST" isn't numeric in subroutine entry at /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/Net/DNS/Resolver/Base.pm line 945. Expected results: Additional info: *** /home/rwf/cpan/build/Net-DNS-0.63-T1FEq9/lib/Net/DNS/Resolver/Base.pm 2008-02-08 15:25:52.000000000 +0000 --- /usr/lib/perl5/vendor_perl/5.10.0/i386-linux-thread-multi/Net/DNS/Resolver/Base.pm 2008-04-09 16:07:49.000000000 +0100 *************** *** 62,68 **** # INET6 prior to 2.01 will not work; sorry. eval {require IO::Socket::INET6; IO::Socket::INET6->VERSION("2.00");} ) { ! import Socket6; $has_inet6=1; }else{ $has_inet6=0; --- 62,68 ---- # INET6 prior to 2.01 will not work; sorry. eval {require IO::Socket::INET6; IO::Socket::INET6->VERSION("2.00");} ) { ! Socket6->import(qw(getaddrinfo)); $has_inet6=1; }else{ $has_inet6=0; ---