my ($procType, $procName, $traceLevel) = (split ' ', $p->{cmd})[0,2,6];