In perl.git, the branch blead has been updated
<http://perl5.git.perl.org/perl.git/commitdiff/f16e7fa35c1302aa056db5d8d022b7861c1dd2e8?hp=a1ac675e7269d812eee0cef173c4a20776569d01>
- Log -----------------------------------------------------------------
commit f16e7fa35c1302aa056db5d8d022b7861c1dd2e8
Author: Karl Williamson <k...@cpan.org>
Date: Sat Jul 23 18:28:52 2016 -0600
Porting/bisect.pl: /usr/sbin/sysctl exists
-----------------------------------------------------------------------
Summary of changes:
Porting/bisect.pl | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/Porting/bisect.pl b/Porting/bisect.pl
index 68d68d1..82b9ae7 100755
--- a/Porting/bisect.pl
+++ b/Porting/bisect.pl
@@ -61,8 +61,10 @@ if (!defined $jobs &&
while (<$fh>) {
++$cpus if /^processor\s+:\s+\d+$/;
}
- } elsif (-x '/sbin/sysctl') {
- $cpus = $1 if `/sbin/sysctl hw.ncpu` =~ /^hw\.ncpu: (\d+)$/;
+ } elsif (-x '/sbin/sysctl' || -x '/usr/sbin/sysctl') {
+ my $sysctl = '/sbin/sysctl';
+ $sysctl = "/usr$sysctl" unless -x $sysctl;
+ $cpus = $1 if `$sysctl hw.ncpu` =~ /^hw\.ncpu: (\d+)$/;
} elsif (-x '/usr/bin/getconf') {
$cpus = $1 if `/usr/bin/getconf _NPROCESSORS_ONLN` =~ /^(\d+)$/;
}
--
Perl5 Master Repository
