Linux ip-148-66-134-25.ip.secureserver.net 3.10.0-1160.119.1.el7.tuxcare.els10.x86_64 #1 SMP Fri Oct 11 21:40:41 UTC 2024 x86_64
Apache
: 148.66.134.25 | : 18.219.25.226
66 Domain
8.0.30
amvm
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
BLACK DEFEND!
README
+ Create Folder
+ Create File
/
usr /
share /
perl5 /
ExtUtils /
CBuilder /
Platform /
[ HOME SHELL ]
Name
Size
Permission
Action
Windows
[ DIR ]
drwxr-xr-x
Unix.pm
1.02
KB
-rw-r--r--
VMS.pm
10.75
KB
-rw-r--r--
Windows.pm
8.83
KB
-rw-r--r--
aix.pm
621
B
-rw-r--r--
cygwin.pm
928
B
-rw-r--r--
darwin.pm
516
B
-rw-r--r--
dec_osf.pm
424
B
-rw-r--r--
os2.pm
2.67
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : cygwin.pm
package ExtUtils::CBuilder::Platform::cygwin; use strict; use File::Spec; use ExtUtils::CBuilder::Platform::Unix; use vars qw($VERSION @ISA); $VERSION = '0.280206'; @ISA = qw(ExtUtils::CBuilder::Platform::Unix); # TODO: If a specific exe_file name is requested, if the exe created # doesn't have that name, we might want to rename it. Apparently asking # for an exe of "foo" might result in "foo.exe". Alternatively, we should # make sure the return value is correctly "foo.exe". # C.f http://rt.cpan.org/Public/Bug/Display.html?id=41003 sub link_executable { my $self = shift; return $self->SUPER::link_executable(@_); } sub link { my ($self, %args) = @_; my $lib = $self->{config}{useshrplib} ? 'libperl.dll.a' : 'libperl.a'; $args{extra_linker_flags} = [ File::Spec->catfile($self->perl_inc(), $lib), $self->split_like_shell($args{extra_linker_flags}) ]; return $self->SUPER::link(%args); } 1;
Close
