[Bioperl-l] Fwd: perl

[Carnë Draug]

Please keep it the conversation on the mailing list. Also, I won't be
doing your homework. There's plenty of documentation for perl and
bioperl.

Carnë


---------- Forwarded message ----------
From: Akash <akki.coool2 at gmail.com>
Date: 26 July 2011 13:28
Subject: perl
To: carandraug+dev at gmail.com


Sir

I am very thankful to you for your suggestion and I tried to work on
the Bio-Perl but as it is very new for me, I am unable to understand
in a very short period of time because the work I am doing, I have to
show in next couple of days.

So Please can you help in this? I want to remove the "contgis" from a
"fasta" file which contain more than "200 base pairs".

With Regards
Akash

I am using this script right now

use strict;
use Bio::SeqIO;
my $in = Bio::SeqIO->new(-file=>"contigs.fa", '-format'=>'FASTA');
my $out = Bio::SeqIO->new(-file=>">contigs1.fa", '-format'=>'FASTA');

while( my $Seq = $in->next_seq())
{

}