At line 333 of CheckLib.pm, swap:

sub _findcc { my @flags = grep { length } map { quotewords('\s+', 0, $_ || ()) } @Config{qw(ccflags ldflags)};

For:

sub _findcc { my @flags = @Config{qw(ccflags ldflags)}; @flags = grep { length } map { quotewords('\s+', 0, $_ || ()) } @f +lags;

And the module will load.

And no, I have no idea why that should affect a fix, but it seems to on my 64-bit AS1007 setup.

All I can add at this point is that with the original, when it gets to line 13 of Config_Heavy.pl it goes tits up:

... >> [0] C:/Perl64/lib/Config.pm : 76: die "&Config::AUTOLOA +D failed on $Config::AUTOLOAD"; >> [0] C:/Perl64/lib/Config_heavy.pl : 13: die $@ if $@ && +$@ !~ /^Can't locate ActivePerl\/Config\.pm/; &Config::AUTOLOAD failed on Config::launcher at C:/Perl64/lib/Config.p +m line 76. BEGIN failed--compilation aborted at C:/Perl64/lib/ActivePerl/Config.p +m line 4. Compilation failed in require at C:/Perl64/lib/Config_heavy.pl line 11 +. BEGIN failed--compilation aborted at C:/Perl64/lib/Config_heavy.pl lin +e 15. Compilation failed in require at C:/Perl64/lib/Config.pm line 74. >> [0] C:/Perl64/lib/File/Temp.pm : 870: local($., $@, $!, $^E +, $?); >> [0] C:/Perl64/lib/File/Temp.pm : 871: cleanup(); >> [0] C:/Perl64/lib/File/Temp.pm : 877: if (!$KEEP_ALL) { >> [0] C:/Perl64/lib/File/Temp.pm : 880: @{ $fi +les_to_unlink{$$} } : () ); >> [0] C:/Perl64/lib/File/Temp.pm : 881: foreach my $file (@ +files) { >> [0] C:/Perl64/lib/File/Temp.pm : 895: @{ $dir +s_to_unlink{$$} } : () ); >> [0] C:/Perl64/lib/File/Temp.pm : 896: foreach my $dir (@d +irs) { >> [0] C:/Perl64/lib/File/Temp.pm : 908: @{ $files_to_unlink +{$$} } = () >> [0] C:/Perl64/lib/File/Temp.pm : 910: @{ $dirs_to_unlink{ +$$} } = ()

But with the change, that line runs fine:

... >> [0] C:/Perl64/lib/Config_heavy.pl : 13: die $@ if $@ && +$@ !~ /^Can't locate ActivePerl\/Config\.pm/; >> [0] C:/Perl64/lib/Config_heavy.pl : 19: our $summary = <<'!END!'; >> [0] C:/Perl64/lib/Config_heavy.pl : 52: my $summary_expanded; >> [0] C:/Perl64/lib/Config_heavy.pl : 73: local *_ = \my $a; >> [0] C:/Perl64/lib/Config_heavy.pl : 74: $_ = <<'!END!'; >> [0] C:/Perl64/lib/Config_heavy.pl : 1155: my $i = 0; ...

However, even with the fix, the suggested test line produces no output. I'm not sure if that is good or bad?, but I guess it is at least progress:

C:\test>perl -MDevel::CheckLib -e1 C:\test>

Let me know If I can try anything else to help you solve this.


Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.

In reply to Re: Devel::CheckLib problem by BrowserUk
in thread Devel::CheckLib problem by syphilis

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.