my @line_array = split /\s+/,$p->{cmd};
my $procType = $line_array[0];
my $procName = $line_array[2];