Help for this page
if ($overlap_cluster_terms_resplit_line =~ /^\s*(GO:\d+)\s\w+/g) { push (@overlap_cluster_terms_nothashed_keysarray, $overlap_clu +ster_desc); ... print OVERLAP_OUTPUT $overlap_cluster_desc; print OVERLAP_OUTPUT "\n\n"; }