my ($id, $sum, @haploStr) = split ('\t',$_);
        push @{$data{$id}{$sum}}, \@haploStr;