SILENT KILLERPanel

Current Path: > > usr > share > perl5 > > vendor_perl > ExtUtils > CBuilder > Platform


Operation   : Linux premium131.web-hosting.com 4.18.0-553.44.1.lve.el8.x86_64 #1 SMP Thu Mar 13 14:29:12 UTC 2025 x86_64
Software     : Apache
Server IP    : 162.0.232.56 | Your IP: 216.73.216.111
Domains      : 1034 Domain(s)
Permission   : [ 0755 ]

Files and Folders in: //usr/share/perl5//vendor_perl/ExtUtils/CBuilder/Platform

NameTypeSizeLast ModifiedActions
Windows Directory - -
Unix.pm File 1046 bytes November 22 2017 16:20:35.
VMS.pm File 10288 bytes November 22 2017 16:20:35.
Windows.pm File 8961 bytes November 22 2017 16:20:35.
aix.pm File 625 bytes November 22 2017 16:20:35.
android.pm File 1216 bytes November 22 2017 16:20:35.
cygwin.pm File 932 bytes November 22 2017 16:20:35.
darwin.pm File 520 bytes November 22 2017 16:20:35.
dec_osf.pm File 428 bytes November 22 2017 16:20:35.
linux.pm File 586 bytes October 16 2019 21:03:08.
os2.pm File 2411 bytes November 22 2017 16:20:35.

Reading File: //usr/share/perl5//vendor_perl/ExtUtils/CBuilder/Platform/cygwin.pm

package ExtUtils::CBuilder::Platform::cygwin;

use warnings;
use strict;
use File::Spec;
use ExtUtils::CBuilder::Platform::Unix;

our $VERSION = '0.280230'; # VERSION
our @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;

SILENT KILLER Tool