Lines 1597-1602
Link Here
|
1597 |
$self->{PERL_LIB} ||= $Config{privlibexp}; |
1597 |
$self->{PERL_LIB} ||= $Config{privlibexp}; |
1598 |
$self->{PERL_ARCHLIB} ||= $Config{archlibexp}; |
1598 |
$self->{PERL_ARCHLIB} ||= $Config{archlibexp}; |
1599 |
$self->{PERL_INC} = $self->catdir("$self->{PERL_ARCHLIB}","CORE"); # wild guess for now |
1599 |
$self->{PERL_INC} = $self->catdir("$self->{PERL_ARCHLIB}","CORE"); # wild guess for now |
|
|
1600 |
# Check for environment override so we'll find the headers in the correct place |
1601 |
if (defined $ENV{PERL_LIB}) |
1602 |
{ |
1603 |
$self->{PERL_LIB} = $ENV{PERL_LIB}; |
1604 |
} |
1605 |
if (defined $ENV{PERL_ARCHLIB}) |
1606 |
{ |
1607 |
$self->{PERL_ARCHLIB} = $ENV{PERL_ARCHLIB}; |
1608 |
} |
1609 |
if (defined $ENV{PERL_INC}) |
1610 |
{ |
1611 |
$self->{PERL_INC} = $ENV{PERL_INC}; |
1612 |
} |
1600 |
my $perl_h; |
1613 |
my $perl_h; |
1601 |
|
1614 |
|
1602 |
if (not -f ($perl_h = $self->catfile($self->{PERL_INC},"perl.h")) |
1615 |
if (not -f ($perl_h = $self->catfile($self->{PERL_INC},"perl.h")) |