reyjrar

(* 
 * New-iTerm-Window.scpt
 * 
 * Intended for use with QuickSilver
 *  I mapped option-y to running this script to create
 *  a new iTerm window on the current workspace
 *
 * Based on much Googling - very little "original" code here
 *   Comments/Suggestions to [email protected]
 *)

epaule

#!/usr/bin/env perl
#
# convert cufflinks GTF into a Augustus hintfile
#
# seq source ep|exon|intron start stop score +/- phase grp=ID; src=E

my %transcripts;

while(<>){
	next unless /Cufflinks\s+exon.*transcript_id/;