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: Unix.pm
Close
package ExtUtils::CBuilder::Platform::Unix; $ExtUtils::CBuilder::Platform::Unix::VERSION = '0.280225'; use warnings; use strict; use ExtUtils::CBuilder::Base; use vars qw(@ISA); @ISA = qw(ExtUtils::CBuilder::Base); sub link_executable { my $self = shift; # On some platforms (which ones??) $Config{cc} seems to be a better # bet for linking executables than $Config{ld}. Cygwin is a notable # exception. local $self->{config}{ld} = $self->{config}{cc} . " " . $self->{config}{ldflags}; return $self->SUPER::link_executable(@_); } sub link { my $self = shift; my $cf = $self->{config}; # Some platforms (notably Mac OS X 10.3, but some others too) expect # the syntax "FOO=BAR /bin/command arg arg" to work in %Config # (notably $Config{ld}). It usually works in system(SCALAR), but we # use system(LIST). We fix it up here with 'env'. local $cf->{ld} = $cf->{ld}; if (ref $cf->{ld}) { unshift @{$cf->{ld}}, 'env' if $cf->{ld}[0] =~ /^\s*\w+=/; } else { $cf->{ld} =~ s/^(\s*\w+=)/env $1/; } return $self->SUPER::link(@_); } 1;