Bug#698764: libio-compress-perl: breaks "debmirror" and possibly other packages.

[gregor herrmann]

On Wed, 23 Jan 2013 22:22:54 +1100, Dmitry Smirnov wrote:

> It turned out that Compress::Raw::Zlib also provided by perl itself: 
> 
> 	perl: /usr/lib/perl/5.14.2/Compress/Raw/Zlib.pm
> 	libcompress-raw-zlib-perl: /usr/lib/perl5/Compress/Raw/Zlib.pm
> 
> and presence of "libio-compress-perl" breaks debmirror because "libio-compress-perl"
> tries to load older Compress::Raw::Zlib provided by perl even if recent enough
> "libcompress-raw-zlib-perl" is installed.

That's weird, /usr/lib/perl5/Compress/Raw/Zlib.pm should be loaded
before /usr/lib/perl/5.14.2/Compress/Raw/Zlib.pm.

Reading Ansgar's reply, he seems to have the same idea like me --
some problem with @INC. I just grepped through debmirrors code, but
didn't find INC there.

On my laptop:

% perl -E 'say foreach @INC'
/etc/perl
/usr/local/lib/perl/5.14.2
/usr/local/share/perl/5.14.2
/usr/lib/perl5
/usr/share/perl5
/usr/lib/perl/5.14
/usr/share/perl/5.14
/usr/local/lib/site_perl
.


And in a sid chroot:

# dpkg -l perl libio-compress-perl libcompress-raw-zlib-perl
Desired=Unknown/Install/Remove/Purge/Hold
| Status=Not/Inst/Conf-files/Unpacked/halF-conf/Half-inst/trig-aWait/Trig-pend
|/ Err?=(none)/Reinst-required (Status,Err: uppercase=bad)
||/ Name                 Version         Architecture    Description
+++-====================-===============-===============-==============================================
ii  libcompress-raw-zlib 2.055-1         amd64           low-level interface to zlib compression librar
ii  libio-compress-perl  2.055-1         all             bundle of IO::Compress modules
ii  perl                 5.14.2-16       amd64           Larry Wall's Practical Extraction and Report L


# grep "\$VERSION =" /usr/lib/perl5/Compress/Raw/Zlib.pm /usr/lib/perl/5.14.2/Compress/Raw/Zlib.pm
/usr/lib/perl5/Compress/Raw/Zlib.pm:$VERSION = '2.055';
/usr/lib/perl5/Compress/Raw/Zlib.pm:$VERSION = eval $VERSION;
/usr/lib/perl/5.14.2/Compress/Raw/Zlib.pm:$VERSION = '2.033';
/usr/lib/perl/5.14.2/Compress/Raw/Zlib.pm:$VERSION = eval $VERSION;

# perl -MCompress::Zlib -e 1 && echo $?
0
 

And Ansgar's commands:

# perl -MCompress::Raw::Zlib -E 'say $INC{"Compress/Raw/Zlib.pm"}'
/usr/lib/perl5/Compress/Raw/Zlib.pm
# perl -MCompress::Zlib -E 'say $INC{"Compress/Zlib.pm"}'
/usr/share/perl5/Compress/Zlib.pm


Cheers,
gregor
 
-- 
 .''`.  Homepage: http://info.comodo.priv.at/ - OpenPGP key 0xBB3A68018649AA06
 : :' : Debian GNU/Linux user, admin, and developer  -  http://www.debian.org/
 `. `'  Member of VIBE!AT & SPI, fellow of the Free Software Foundation Europe
   `-   NP: Mercedes Sosa: Vuelvo Al Sur
-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 836 bytes
Desc: Digital signature
URL: <http://lists.alioth.debian.org/pipermail/pkg-perl-maintainers/attachments/20130123/6b4483af/attachment-0001.pgp>