![]() System : Linux host44.registrar-servers.com 4.18.0-553.44.1.lve.el8.x86_64 #1 SMP Thu Mar 13 14:29:12 UTC 2025 x86_64 User : vapecompany ( 2719) PHP Version : 7.4.33 Disable Function : NONE Directory : /proc/self/root/proc/self/root/usr/share/perl5/vendor_perl/ExtUtils/CBuilder/Platform/ |
Upload File : |
package ExtUtils::CBuilder::Platform::linux; use strict; use ExtUtils::CBuilder::Platform::Unix; use File::Spec; our $VERSION = '0.280230'; our @ISA = qw(ExtUtils::CBuilder::Platform::Unix); sub link { my ($self, %args) = @_; my $cf = $self->{config}; # Link XS modules to libperl.so explicitly because multiple # dlopen(, RTLD_LOCAL) hides libperl symbols from XS module. local $cf->{lddlflags} = $cf->{lddlflags}; if ($ENV{PERL_CORE}) { $cf->{lddlflags} .= ' -L' . $self->perl_inc(); } $cf->{lddlflags} .= ' -lperl'; return $self->SUPER::link(%args); } 1;