Linux ip-172-26-7-228 5.4.0-1103-aws #111~18.04.1-Ubuntu SMP Tue May 23 20:04:10 UTC 2023 x86_64
Apache
: 172.26.7.228 | : 18.118.55.109
Cant Read [ /etc/named.conf ]
5.6.40-24+ubuntu18.04.1+deb.sury.org+1
www-data
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
share /
perl /
5.26.1 /
ExtUtils /
CBuilder /
Platform /
[ HOME SHELL ]
Name
Size
Permission
Action
Windows
[ DIR ]
drwxr-xr-x
Unix.pm
1.06
KB
-rw-r--r--
VMS.pm
10.08
KB
-rw-r--r--
Windows.pm
8.79
KB
-rw-r--r--
aix.pm
660
B
-rw-r--r--
android.pm
1.23
KB
-rw-r--r--
cygwin.pm
970
B
-rw-r--r--
darwin.pm
558
B
-rw-r--r--
dec_osf.pm
467
B
-rw-r--r--
os2.pm
2.39
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : aix.pm
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;
Close
