use strict;
use warnings;
print STDERR "gene symbol column number: ";
my $geneSymbolCol=<STDIN>;
chomp($geneSymbolCol);
$geneSymbolCol--;
my $expFile="probeMatrix.txt";
my $gplFile="ann.txt";
my $expFileWF="geneMatrix.txt";
my %hash=();
my @sampleName=();
open(EXP,"$expFile") or d...
use strict;use warnings;print STDERR "gene symbol column number: ";my $geneSymbolCol=<STDIN>;chomp($geneSymbolCol);$geneSymbolCol--;my $expFile="probeMatrix.txt";my $gplFile="ann.txt";my $expFileWF="geneMatrix.txt";my %hash=();my @sampleName=();open(EXP,"$expFile") or die $!; open(PL,"GEOimmun...