Trouble installing qpsmtpd

Hans Salvisberg

unread,

Sep 22, 2016, 2:45:02 AM9/22/16

to qps...@perl.org

Hi All,

Once again I'm installing qpsmtpd (the current HEAD at this point) on a
new server and having some trouble.

The first issue was installing Mail::SPF -- I got the test failure
described here:
https://rt.cpan.org/Public/Bug/Display.html?id=116421
and I used "force" to install anyway.

However, now, when I try to run.forkserver or in.qpsmtpd (I'll want to
run it under xinetd as explained on
https://wiki.qpsmtpd.org/doku.php?id=deploy:start), then I get

Insecure dependency in require while running with -T switch at
/usr/local/share/perl/5.18.2/Net/DNS/Resolver/Base.pm line 570.
BEGIN failed--compilation aborted at
/usr/local/share/perl/5.18.2/Net/DNS/Resolver/Base.pm line 570.
Compilation failed in require at (eval 16) line 2.
...propagated at /usr/share/perl/5.18/base.pm line 83.
BEGIN failed--compilation aborted at
/usr/local/share/perl/5.18.2/Net/DNS/Resolver/UNIX.pm line 18.
Compilation failed in require at (eval 15) line 2.
...propagated at /usr/share/perl/5.18/base.pm line 83.
BEGIN failed--compilation aborted at
/usr/local/share/perl/5.18.2/Net/DNS/Resolver.pm line 22.
Compilation failed in require at /usr/local/share/perl/5.18.2/Net/DNS.pm
line 51.
Compilation failed in require at lib/Qpsmtpd/Base.pm line 4.
BEGIN failed--compilation aborted at lib/Qpsmtpd/Base.pm line 4.
Compilation failed in require at lib/Qpsmtpd/TcpServer.pm line 8.
BEGIN failed--compilation aborted at lib/Qpsmtpd/TcpServer.pm line 8.
Compilation failed in require at ./qpsmtpd line 12.
BEGIN failed--compilation aborted at ./qpsmtpd line 12.

What is it trying to tell me and how can I fix it?

Thanks in advance!
Hans

Hans Salvisberg

unread,

Sep 24, 2016, 11:30:03 AM9/24/16

to qps...@perl.org

The line 570 in /usr/local/share/perl/5.18.2/Net/DNS/Resolver/Base.pm reads

no integer;

The context is

} #SELECTOR LOOP
} #NAMESERVER LOOP
no integer;
$timeout += $timeout;
} #RETRY LOOP

Should I just remove the -T? Or comment out the "no integer;"?

The "no integer;" is odd in this position at the end of a loop,
especially because there is no "use integer;" in the containing
_send_udp method in
http://cpansearch.perl.org/src/NLNETLABS/Net-DNS-1.06_03/lib/Net/DNS/Resolver/Base.pm

$timeout is (from earlier in the function):
my $timeout = $servers ? do { no integer; $retrans / $servers } : 0;

So it should be safe to remove the offending line, right?

BTW, this issue has also been reported here:
https://lists.opensuse.org/opensuse-bugs/2016-06/msg04186.html

Hans

Hans Salvisberg

unread,

Sep 24, 2016, 12:30:02 PM9/24/16

to qps...@perl.org

It turns out there are more -T issues in Net:DNS.

I'm running on Ubuntu 14.04 which has perl 5.18.2. Is this a problem
with that perl version?

Is there a work-around, or what can I do?

Hans

Richard Siddall

unread,

Sep 24, 2016, 3:00:02 PM9/24/16

to qps...@perl.org

What version of Net::DNS do you have?

Richard.

Hans Salvisberg

unread,

Sep 25, 2016, 4:15:02 AM9/25/16

to Richard Siddall, qps...@perl.org

Thank you for your reply, Richard!

I'm not sure how to tell -- is it

VERSION
$Id: FAQ.pod 1365 2015-06-26 08:46:01Z willem $

from /usr/local/share/perl/5.18.2/Net/DNS/FAQ.pod ? Or

~/.cpan/sources/authors/id/N/NL/NLNETLABS/Net-DNS-1.06.tar.gz

According to https://www.net-dns.org/ that seems to be current.

Hans

Hans Salvisberg

unread,

Sep 25, 2016, 7:30:01 AM9/25/16

to qps...@perl.org

I found the fix -- it's the patch in
https://rt.cpan.org/Public/Bug/Display.html?id=114819#txn-1632799

Apparently it's an issue that came in in 1.06 and should be fixed in 1.07.

Thanks,
Hans

Richard Siddall

unread,

Sep 25, 2016, 10:00:02 AM9/25/16

to qps...@perl.org

Good. I'm glad you thought to look through the bugs.

Richard.