Skip site navigation (1)Skip section navigation (2)
Date:      Mon, 10 Oct 2016 16:14:31 +0000 (GMT)
From:      =?utf-8?Q?Bj=C3=B6rn_R=C3=B3bertsson?= <bjornr@isnic.is>
To:        perl@freebsd.org
Subject:   Re p5-Net-Server
Message-ID:  <1666507690.937418.1476116071466.JavaMail.zimbra@sirona.isnic.is>
In-Reply-To: <1885134660.937356.1476115915466.JavaMail.zimbra@sirona.isnic.is>

next in thread | previous in thread | raw e-mail | index | archive | help
A version compare fails in perl 5.22 after Syslog VERSION contains _, i.e. =
perl reports:
Argument "0.33_01" isn't numeric in numeric lt (<) at /usr/local/lib/perl5/=
site_perl/Net/Server/Log/Sys/Syslog.pm line 42.

I am using p5-Net-Server 2.008_1 and perl5-5.22.3.r3

grep -R "0.33_01" *
5.22/Module/CoreList.pm:            'Sys::Syslog'           =3D> '0.33_01',
5.22/mach/Sys/Syslog.pm:    $VERSION =3D '0.33_01';
Binary file 5.22/mach/auto/Sys/Syslog/Syslog.so matches
5.22/pod/perl5223delta.pod:L<Sys::Syslog> has been upgraded from version 0.=
33 to 0.33_01.

The code that fails is from /usr/local/lib/perl5/site_perl/Net/Server/Log/S=
ys/Syslog.pm:

        if ($prop->{'syslog_logsock'} =3D~ /^(|native|tcp|udp|unix|inet|str=
eam|console)$/) {
            $prop->{'syslog_logsock'} =3D $1;
        } else {
            $prop->{'syslog_logsock'} =3D ($Sys::Syslog::VERSION < 0.15) ? =
'unix' : '';
        }


According to https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=3D839405 the=
 < should be replaced with lt

Kind regards,
Bj=C3=B6rn



Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?1666507690.937418.1476116071466.JavaMail.zimbra>