1
0
mirror of https://github.com/MariaDB/server.git synced 2025-07-30 16:24:05 +03:00

WL4189 Active state perl fixes

This commit is contained in:
Magnus Svensson
2008-10-08 20:25:28 +02:00
parent b3b8274e08
commit 5b8771ea3a
3 changed files with 14 additions and 4 deletions

View File

@ -76,7 +76,7 @@ sub _kstat {
my ($self)= @_;
while (1){
my $instance_num= $self->{cpus} ? @{$self->{cpus}} : 0;
my $list= `kstat -p -m cpu_info -i $instance_num`;
my $list= `kstat -p -m cpu_info -i $instance_num 2> /dev/null`;
my @lines= split('\n', $list) or last; # Break loop
my $cpuinfo= {};