Select Code to Download

==> igenome.genes.onlyexons.uniq.gtf <==
chr1    unknown    exon1    815    4692    .    -    .    gene_id "LOC
+653635"; gene_name "LOC653635"; transcript_id "XR_017611.2"; tss_id "
+TSS10265";
...
chr1    unknown    exon23    133719    134341    .    -    .    gene_i
+d "LOC729737"; gene_name "LOC729737"; p_id "P4208"; transcript_id "XM
+_001133863.1"; tss_id "TSS9238";
chr1    unknown    exon24    217633    218641    .    -    .    gene_i
+d "LOC728481"; gene_name "LOC728481"; transcript_id "XR_015292.2"; ts
+s_id "TSS13278";
chr1    unknown    exon25    313133    319752    .    +    .    gene_i
+d "LOC100132287"; gene_name "LOC100132287"; transcript_id "XR_039254.
+1"; tss_id "TSS18904";

 
#!/usr/bin/perl -w

...
  my $bed = join "\t", @gtf[0,3,4,8];
  print "$bed\n";
}