Bonjour à tout et à tous,

Savez vous quel module du Perl ou quel logiciel qui permet de diviser un fichier FASTA en plusieurs fichier de même format? Par exemple j'ai un fichier Fasta comme suivant contenant les séquences, et je veux diviser en trois différents fichiers avec son nom A1.fasta, B1.fasta, C1 fasta.

En général comment diviser un fichier des séquences en N fichiers avec les noms différents?

Merci en avance!
jobim08

>A1
GATACCAGCGGGATCATTATGCCACATTCTGATCTTGGACCTGCATTATAGATCTGACTT
>A2
AAGTCAGATCTATAATGCAGGTCCAAGATCAGAATGTGGCATAATGATCCCGCTGGTATC
>B1
CGCGTCGAAATTTTGCACGGCTGTTAGTTTTACGAGTTGAGCAGTCAAGATTAAATGATG
>B2
CATCATTTAATCTTGACTGCTCAACTCGTAAAACTAACAGCCGTGCAAAATTTCGACGCG
>B3
GGAGCCAGTCACTCATCCTGACGACATTCGGATCATTACTGACGTAGTACTAAGGAACGA
>C1
TCGTTCCTTAGTACTACGTCAGTAATGATCCGAATGTCGTCAGGATGAGTGACTGGCTCC
>C2
GCTAAACTACTGCAGCACCAGAGGGCACATCACCCGTACCTGATTCCACCACCAACTACC
>C3
GGTAGTTGGTGGTGGAATCAGGTACGGGTGATGTGCCCTCTGGTGCTGCAGTAGTTTAGC
>C4
CCATTGCTATTGCCACCGGATCCTCAGACTTCGTTGGTGTATCAGCTATCGCATCTGGTT
>C5
CCATTGCTATTGCCACCGGATCCTCAGACTTCGTTGGTGTATCAGCTATCGCATCTGGTT