module Bio::SeqIO
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 my $seq = Bio::PrimarySeq->new (-seq =>'CTAGGAATTCCTTAATTCATTAGCTCTGACTGCAAAGCTCGGGCAATATGTTTTCTCAGT', -primary_id => 'synopsis', -molecule => 'dna'); $seq->is_circular = 1;Le problème vient de la ligne $seq->is_circular = 1, peut-on forcer la modification d'un objet? Merci,Can't modify non-lvalue subroutine call at Restriction_Analysis_is_circular.pl line 14.
A défaut de trouver mieux, j'écrase l'objet si je dois le modifier :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 my $seq = Bio::PrimarySeq->new (-seq =>$seq_seq, -primary_id => $seq_id); if ($is_circular == 1){ $seq = Bio::PrimarySeq->new (-seq =>$seq_seq, -primary_id => $seq_id, -is_circular => 1); }
Merci;
Partager