$host = $1;
@cols = qw( kernel build arch );
@vals = ( qq{"$2"}, qq{"$3"}, qq{"$4"} ); # must quote all this as strings for influx
$host = $1;
@cols = qw( kernel build arch );
@vals = ( qq{"$2"}, qq{"$3"}, qq{"$4"} ); # must quote all this as strings for influx
} elsif ( m/^\s+(.+)/ ) {
@vals = split(/\s+/, $1);
} else {
} elsif ( m/^\s+(.+)/ ) {
@vals = split(/\s+/, $1);
} else {
next if $measurement =~ /top3/; # FIXME this isn't parsed yet
#XXX { cols => \@cols, vals => \@vals };
next if $measurement =~ /top3/; # FIXME this isn't parsed yet
#XXX { cols => \@cols, vals => \@vals };