use File::Basename ();
use Perl::OSType qw/os_type/;
-use vars qw($VERSION @ISA);
-$VERSION = '0.280209';
-$VERSION = eval $VERSION;
+use warnings;
+use strict;
+our $VERSION = '0.280240'; # VERSION
+our @ISA;
# We only use this once - don't waste a symbol table entry on it.
# More importantly, don't make it an inheritable method.
{
my @package = split /::/, __PACKAGE__;
-
+
my $ostype = os_type();
if (grep {-e File::Spec->catfile($_, @package, 'Platform', $^O) . '.pm'} @INC) {
- $load->(__PACKAGE__ . "::Platform::$^O");
-
- } elsif ( $ostype && grep {-e File::Spec->catfile($_, @package, 'Platform', $ostype) . '.pm'} @INC) {
- $load->(__PACKAGE__ . "::Platform::$ostype");
-
+ $load->(__PACKAGE__ . "::Platform::$^O");
+
+ } elsif ( $ostype &&
+ grep {-e File::Spec->catfile($_, @package, 'Platform', $ostype) . '.pm'} @INC) {
+ $load->(__PACKAGE__ . "::Platform::$ostype");
+
} else {
- $load->(__PACKAGE__ . "::Base");
+ $load->(__PACKAGE__ . "::Base");
}
}
ExtUtils::CBuilder is maintained as part of the Perl 5 core. Please
submit any bug reports via the F<perlbug> tool included with Perl 5.
Bug reports will be included in the Perl 5 ticket system at
-L<http://rt.perl.org>.
+L<https://rt.perl.org>.
-The Perl 5 source code is available at <http://perl5.git.perl.org/perl.git>
+The Perl 5 source code is available at L<https://perl5.git.perl.org/perl.git>
and ExtUtils-CBuilder may be found in the F<dist/ExtUtils-CBuilder> directory
of the repository.