Perl Failure - Log::Dispatch

Shayne Patton linuxh3d at comcast.net
Tue Feb 10 01:24:29 CST 2004


Help Please!!!!

I keep getting the following output error when installing the 
Log::Dispatch (v2.09 from cpan) module..............

Executing /usr/bin/perl Makefile.PL  && make ..
/usr/bin/perl Build.PL
Checking whether your kit is complete...
Looks good
Creating new 'Build' script for 'Log-Dispatch' version '2.09'
Can't call method "find_perl_interpreter" on an undefined value at 
/usr/lib/perl5/site_perl/5.8.1/Mo
dule/Build/Compat.pm line 150.

The actual code for lines 139 - 174 in "Compat.pm" are as follows....

sub run_build_pl {
  my ($pack, %in) = @_;
  $in{script} ||= 'Build.PL';
  my @args = $in{args} ? $pack->makefile_to_build_args(@{$in{args}}) : ();
  print "$^X $in{script} @argsn";
  system($^X, $in{script}, @args) == 0 or die "Couldn't run $in{script}: 
$!";
}

sub fake_makefile {
  my ($self, %args) = @_;

  my $perl = $args{build_class}->find_perl_interpreter;
  my $os_type = $args{build_class}->os_type;
  my $noop = ($os_type eq 'Windows' ? 'rem' :
          $os_type eq 'VMS'     ? 'Continue' :
          'true');

  # Start with a couple special actions
  my $maketext = <<"EOF";
all : force_do_it
    $perl Build
realclean : force_do_it
    $perl Build realclean
    $perl -e unlink -e shift $args{makefile}

force_do_it :
    @ $noop
EOF

  foreach my $action ($args{build_class}->known_actions) {
    next if $action =~ /^(all|realclean|force_do_it)$/;  # Don't 
double-define
    $maketext .= <<"EOF";
$action : force_do_it
    $perl Build $action
EOF
  }

Thanx in advance for any help y'all can give me here.

Universally,
Shayne




More information about the Kclug mailing list