Discussion :

[Jasmine80]

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;

Can't modify non-lvalue subroutine call at Restriction_Analysis_is_circular.pl line 14.

Le problème vient de la ligne $seq->is_circular = 1, peut-on forcer la modification d'un objet? Merci,


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;