Bug#856504: perl: should skip @INC paths with unsufficient permission

[Bill Allombert]

Package: perl
Version: 5.20.2-3+deb8u6
Severity: normal

Dear perl maintainers,

The following sequence gives:

% sudo chmod o-x /usr/local/lib

% perl -e "print join(' ', at INC);"
/etc/perl /usr/local/lib/x86_64-linux-gnu/perl/5.20.2
/usr/local/share/perl/5.20.2 /usr/lib/x86_64-linux-gnu/perl5/5.20
/usr/share/perl5 /usr/lib/x86_64-linux-gnu/perl/5.20
/usr/share/perl/5.20 /usr/local/lib/site_perl .

% perl -e 'use strict;'
Can't locate strict.pm:
/usr/local/lib/x86_64-linux-gnu/perl/5.20.2/strict.pm: Permission denied
at -e line 1.
BEGIN failed--compilation aborted at -e line 1.

I think it would be more useful to skip
/usr/local/lib/x86_64-linux-gnu/perl/5.20.2/
and proceed with the next directory, rather than fail.

See bug #855617 for reference.

Cheers,
-- 
Bill. <ballombe at debian.org>

Imagine a large red swirl here.