Select Code to Download

$data{HG00554}[162] = (0 0, 0 0, ... , 0 0 )

$data{$individual}[ [ shift @snp_bins ] ] = $snp;

for my $index ( 0 .. $#snp_bins ){
  push( @{$data{HG00554}[$snp_bins[$index]]}, $snps[$index] );
}