@split_hit_non_barrel=split(/\n/, $separate_hit_non_barrel);

##</code><code>##

$hit_line_non_barrel=$split_hit_non_barrel[0];

##</code><code>##

$hit_line_non_barrel=~/^(.*?)\s+/