Mercurial > repos > matces > carpet_toolsuite

comparison carpet-src-1/tools/CARPET/MapToExon_RefSeqMat_new.pl @ 1:78770028dcf1 default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Migrated tool version 1.0.1 from old tool shed archive to new tool shed repository
author matces
date Tue, 07 Jun 2011 16:59:33 -0400
parents cdd489d98766
children
comparison
equal deleted inserted replaced
0:cdd489d98766 1:78770028dcf1
142 { 142 {
143 $exoncount=1; 143 $exoncount=1;
144 } 144 }
145 $geneName=$kEle[$zname]; 145 $geneName=$kEle[$zname];
146 $exonStartref=$kEle[$zexonstart]; 146 $exonStartref=$kEle[$zexonstart];
147 my $feature="$ref\t$geneName\t$transcriptStart\t$transcriptStop\t$strand"; 147 #my $feature="$ref\t$geneName\t$transcriptStart\t$transcriptStop\t$strand";
148 148
149 my @exonStart=split(",", $exonStartref); 149 my @exonStart=split(",", $exonStartref);
150 150
151 if (!$zblocksize){ 151 if (!$zblocksize){
152 $exonEndref=$kEle[$zexonend]; 152 $exonEndref=$kEle[$zexonend];