- Set $sysinfo{"KERNEL"} and $sysinfo{"CPU"} (minus cache) values

Index: pgcluu
--- pgcluu.orig
+++ pgcluu
@@ -10985,13 +10985,13 @@ sub read_sysinfo_file
 			next;
 		}
 		if ($section eq 'CPU') {
-			my ($key, $val) = split(/\s+:\s+/, $l);
-			if ($key eq 'processor') {
-				$sysinfo{$section}{$key} = $val + 1;
-			} elsif ($key eq 'model name') {
-				$val =~ s/\s+\@\s+(.*)$//;
-				$sysinfo{$section}{'cpu MHz'} = $1;
-				$sysinfo{$section}{$key} = $val;
+			my ($key, $val) = split(/=/, $l);
+			if ($key eq 'hw.ncpuonline') {
+				$sysinfo{$section}{'processor'} = $val;
+			} elsif ($key eq 'hw.model') {
+				$sysinfo{$section}{'model name'} = $val;
+			} elsif ($key eq 'hw.cpuspeed') {
+				$sysinfo{$section}{'cpu MHz'} = $val;
 			} else {
 				$sysinfo{$section}{$key} = $val;
 			}
@@ -10999,8 +10999,8 @@ sub read_sysinfo_file
 		elsif ($section eq 'KERNEL') {
 			my @kinf = split(/\s+/, $l);
 			$sysinfo{$section}{'hostname'} = $kinf[1];
-			$sysinfo{$section}{'kernel'} = "$kinf[0] $kinf[2] $kinf[3] $kinf[4]";
-			$sysinfo{$section}{'arch'} = "$kinf[-2] $kinf[-1]";
+			$sysinfo{$section}{'kernel'} = "$kinf[2] $kinf[3]";
+			$sysinfo{$section}{'arch'} = "$kinf[-1]";
 		}
 		elsif ($section eq 'UPTIME') {
 			$sysinfo{$section}{'all'} = $l;
