Select Code to Download

foreach $item (@{$clusters}) {
    $ID = $units[$i][0];
...
    $parser_hash{$item} .= $promoter_line;
    $i++;
}