Edward Wijaya wrote:
Suppose I have these two arrays:

@arr1 =    ('GATGGATTAAAGGAGAGGTACTTACAGG',
            'CGCCCAAGAGGCCAGAGCGGAGCGGGGA',
            'CGTTAATGCATTAATTTTAGTTAAAACT');

   @arr2 = ('tcctcta',
            'aggccac',
            'agctgcg');

Is there any efficient way to copy each element
of @arr2 as part of each elements in @arr1
such that it gives result:

@arr3 =    ('GAtcctctaAAGGAGAGGTACTTACAGG',
            'CGCCCAAGAGGCCAGaggccacCGGGGA',
            'CGTTAAagctgcgATTTTAGTTAAAACT');

#the starting position to be copied to in @arr1 can is random.

perldoc -f substr

--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>




Reply via email to