Mercurial > repos > mcharles > rapsosnp
comparison rapsodyn/fastaGroomerForMakeBlastdb.pl @ 7:3f7b0788a1c4 draft
Uploaded
author | mcharles |
---|---|
date | Tue, 07 Oct 2014 10:34:34 -0400 |
parents | 442a7c88b886 |
children |
comparison
equal
deleted
inserted
replaced
6:1776b8ddd87e | 7:3f7b0788a1c4 |
---|---|
1 #!/usr/bin/perl | 1 #!/usr/bin/perl |
2 #V1.0.0 | |
2 my $inputfasta = $ARGV[0]; | 3 my $inputfasta = $ARGV[0]; |
3 | 4 |
4 open(IB, $inputfasta) or die ("Can't open $inputfasta \n"); | 5 open(IB, $inputfasta) or die ("Can't open $inputfasta \n"); |
5 | 6 |
6 while (my $ligne = <IB>){ | 7 while (my $ligne = <IB>){ |