my ($probeset_id, $origin, $probeseq, $pip, $gc, $affyscore) = split /\t/;