foreach my $probeseq ( sort keys %{$row{$origin}{$pip}{$probeset_id}{$affyscore}{$gc}}){