Re^3: How to avoid having to remove PERL_DL

Try this:

use ExtUtils::MakeMaker;
package MY;
sub test_via_harness {
  my($self, $perl, $tests) = @_;
  local $_ = $self->SUPER::test_via_harness($perl, $tests);
  s/PERL_DL_NONLAZY=1//g;
  return $_;
}

sub test_via_script {
  my($self, $perl, $tests) = @_;
  local $_ = $self->SUPER::test_via_script($perl, $tests);
  s/PERL_DL_NONLAZY=1//g;
  return $_;
}

package main;
# rest of your Makefile.PL
[download]

the lowliest monk

Comment on Re^3: How to avoid having to remove PERL_DL_NONLAZY=1 from Makefile? Download Code

Replies are listed 'Best First'.
Re^4: How to avoid having to remove PERL_DL_NONLAZY=1 from Makefile? by diotalevi (Canon) on Mar 31, 2005 at 22:16 UTC
I chatted with people about this. Apparently $self is blessed into PACK001 which is not ISA anything useful. The proper thing to do is call directly into the MM class (not ExtUtils::MM though). The following code is what actually works. I'm getting a taste of why ExtUtils::MakeMaker is being killed. Yuck. I hope it dies a quick death. `sub MY::test_via_harness { local $_ = shift()->MM::test_via_harness( @_ ); s/\bPERL_DL_NONLAZY=1 +//g; return $_; } sub MY::test_via_script { local $_ = shift()->MM::test_via_script( @_ ); s/\bPERL_DL_NON_LAZY=1 +//g; return $_; }` [download]	[reply] [d/l]
Re^5: How to avoid having to remove PERL_DL_NONLAZY=1 from Makefile? by tlm (Prior) on Mar 31, 2005 at 22:34 UTC
Yeah, it's a mess: DB<1> c 13 MY::CODE(0x853f698)(Makefile.PL:13): 13: local $_ = $self->SUPER::test_via_script($perl, $tests); DB<1> p $self PACK001=HASH(0x8387700) DB<2> x \@PACK001::ISA 0 ARRAY(0x8768988) 0 'MM' DB<3> x \@MM::ISA 0 ARRAY(0x83cccb8) 0 'ExtUtils::MM' DB<4> x \@ExtUtils::MM::ISA 0 ARRAY(0x83ccb14) 0 'ExtUtils::MM_Unix' 1 'ExtUtils::Liblist' 2 'ExtUtils::MakeMaker' DB<6> x \@ExtUtils::MM_Unix::ISA 0 ARRAY(0x8481508) 0 'ExtUtils::MM_Any' DB<7> x \@ExtUtils::MM_Any::ISA 0 ARRAY(0x8538cc4) 0 'File::Spec' [download] the lowliest monk	[reply] [d/l]