j'ai un bout de script qui me permet de traduire une chaine d'ADN en ARN (c'est-à-dire de convertir tous les T d'une chaine en U)
Voici le code:
J e suis sous MAC OS et j'exécute ce script depuis un terminal. L e problèle est que dès que je saisie ( copie-colle) une séquence de plus de 1024 caractère la traduction n'a pas lieu alors que en dessous de 1024 caractères "tout se passe bien".
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 #!/usr/bin/perl -w use strict; print "\nSaisie de la sequence ADN\n"; my $sequence = <STDIN>; sub Convertion { my ($sequence) =@_; $sequence =~ tr/ATGCatgc/UACGuacg/; print "\nLa sequence ARN est : $sequence\n"; } Convertion ($sequence);
D'où vient ce pbl?
je pensais qu'en perl , il n'y avait pas de pbl de "taille".
Partager