zhoujj zhoujj2013

zhoujj2013 / gtf2refGene.pl

Last active December 17, 2023 14:07

Convert ensembl gtf file to UCSC refGene.txt file.

	#!/usr/bin/perl -w

	use strict;
	use Data::Dumper;

	&usage if @ARGV<1;

	#open IN,"" \|\|die "Can't open the file:$\n";
	#open OUT,"" \|\|die "Can't open the file:$\n";

zhoujj2013 / separate_seq.pl

Last active December 26, 2015 18:09

Given a sequence then separate the sequence to piece with certain overlap.

	#!/usr/bin/perl -w
	use strict;
	#use Data::Dumper;

	# Usage:
	# perl ./separate_seq.pl <piece length> <ovelap> <input file *.fa>

	my ($l,$o,$f) = @ARGV;

	open IN,"$f" \|\| die $!;