Commit 003b4c91 authored by Ian Longden's avatar Ian Longden
Browse files

column change

parent e373bb79
......@@ -75,7 +75,7 @@ sub run {
my $mismatch = 0;
while ( $line = $rgd_io->getline() ) {
chomp $line;
my ($rgd, $symbol, $name, $refseq) = (split (/\t/,$line))[0,1,2,16];
my ($rgd, $symbol, $name, $refseq) = (split (/\t/,$line))[0,1,2,25];
my @nucs = split(/\,/,$refseq);
my $done = 0;
my $failed_list ="";
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment