local $_=<$fh>;
    (warn "something wrong!\n"), next
      unless /^cpu\b/;
    my @loads = (/\d+/g)[0..2];