my $transcripts_line = join "\t", @{ $transcripts{$transcript_ip}{$transcript_id} }{@transcripts_columns};