OXIESEC PANEL
- Current Dir:
/
/
usr
/
share
/
perl
/
5.26.1
/
ExtUtils
/
CBuilder
/
Platform
Server IP: 139.59.38.164
Upload:
Create Dir:
Name
Size
Modified
Perms
📁
..
-
05/09/2024 07:13:15 AM
rwxr-xr-x
📄
Unix.pm
1.06 KB
05/23/2023 05:17:19 PM
rw-r--r--
📄
VMS.pm
10.08 KB
05/23/2023 05:17:19 PM
rw-r--r--
📁
Windows
-
05/09/2024 07:13:15 AM
rwxr-xr-x
📄
Windows.pm
8.79 KB
05/23/2023 05:17:19 PM
rw-r--r--
📄
aix.pm
660 bytes
05/23/2023 05:17:19 PM
rw-r--r--
📄
android.pm
1.23 KB
05/23/2023 05:17:19 PM
rw-r--r--
📄
cygwin.pm
970 bytes
05/23/2023 05:17:19 PM
rw-r--r--
📄
darwin.pm
558 bytes
05/23/2023 05:17:19 PM
rw-r--r--
📄
dec_osf.pm
467 bytes
05/23/2023 05:17:19 PM
rw-r--r--
📄
os2.pm
2.39 KB
05/23/2023 05:17:19 PM
rw-r--r--
Editing: aix.pm
Close
package ExtUtils::CBuilder::Platform::aix; $ExtUtils::CBuilder::Platform::aix::VERSION = '0.280225'; use warnings; use strict; use ExtUtils::CBuilder::Platform::Unix; use File::Spec; use vars qw(@ISA); @ISA = qw(ExtUtils::CBuilder::Platform::Unix); sub need_prelink { 1 } sub link { my ($self, %args) = @_; my $cf = $self->{config}; (my $baseext = $args{module_name}) =~ s/.*:://; my $perl_inc = $self->perl_inc(); # Massage some very naughty bits in %Config local $cf->{lddlflags} = $cf->{lddlflags}; for ($cf->{lddlflags}) { s/\Q$(BASEEXT)\E/$baseext/; s/\Q$(PERL_INC)\E/$perl_inc/; } return $self->SUPER::link(%args); } 1;