Hello Cygwinstas,

I've got a question about the cygwin perl package installed with cygwin
setup. I'm having a failure in some perl code not written by me but rather
in a CPAN module I am seeking to install. This failure does not occur on
Gnu/Linux. The first 10 lines of that module are:

package Array::Contains;


use 5.010_001;
use strict;
use warnings;
use diagnostics;
use mro 'c3';
use English;
our $VERSION = 2.8;
use Carp;

Line 6 contains the directive to use the diagnostics pragma as you see. But
when the perl compiler hits that line, it dies with the following long and
slightly confusing messages:

Simplest test case is a one-liner:

$ perl '-Mdiagnostics' -le 'print $diagnostics::VERSION'
couldn't find diagnostic data in /usr/share/perl5/5.40/pods/perldiag.pod
/usr/share/perl5 /usr/local/lib/perl5/site_perl/5.40/x86_64-cygwin-threads
/usr/local/share/perl5/site_perl/5.40
/usr/lib/perl5/vendor_perl/5.40/x86_64-cygwin-threads
/usr/share/perl5/vendor_perl/5.40 /usr/lib/perl5/5.40/x86_64-cygwin-threads
/usr/share/perl5/5.40 -e at /usr/share/perl5/5.40/diagnostics.pm line 259,
<POD_DIAG> line 718.
Compilation failed in require.
BEGIN failed--compilation aborted.

Apparently what happens when it's working right is that code opens a pod
file and reads in needed data from a filehandle on that file. Why it's done
that way is beyond my pay grade. The file is supposed to be at
/usr/share/perl5/5.40/pods/perldiag.pod and that file doesn't exist in my
cygwin installation. I suggest that to respond to my appeal for advice, a
reader using CygwinPerl could check for that file and let us know if it is
present.

  With thanks,
     Soren Andersen

package Array::Contains;

use 5.010_001;
use strict;
use warnings;
use diagnostics;
use mro 'c3';
use English;
our $VERSION = 2.8;
use Carp;


package Array::Contains;

use 5.010_001;
use strict;
use warnings;
use diagnostics;
use mro 'c3';
use English;
our $VERSION = 2.8;
use Carp;

package Array::Containpackage Array::Contains;

use 5.010_001;
use strict;
use warnings;
use diagnostics;
use mro 'c3';
use English;
our $VERSION = 2.8;

use Carp;s;

use 5.010_001;
use strict;
use warnings;
use diagnostics;
use mro 'c3';
use English;
our $VERSION = 2.8;
use Carp;

package Array::Contains;

use 5.010_001;
use strict;
use warnings;
use diagnostics;
use mro 'c3';
use English;
our $VERSION = 2.8;

use Carp;package Array::Contains;

use 5.010_001;
use strict;
use warnings;
use diagnostics;
use mro 'c3';
use English;
our $VERSION = 2.8;
use Carp;

-- 
Problem reports:      https://cygwin.com/problems.html
FAQ:                  https://cygwin.com/faq/
Documentation:        https://cygwin.com/docs.html
Unsubscribe info:     https://cygwin.com/ml/#unsubscribe-simple

Reply via email to