[Bioperl-l] names/id in multi-alignment files

[Marco Landwehr]

Hi,
when reading in s multi alignment file of the fasta format:

#read in alignment
$str = Bio::AlignIO->new('-file' => $filename);	
$aln = $str->next_aln();

I cannot extract the "header" name or id with:

foreach $seq ($aln->id()){
	print $seq,"\n";
}

Is there a way to do this?
When using:

#alternative way to read all sequences from multi fasta file
@seq_object_array = read_all_sequences($filename,'fasta');

I can get the name of a specific sequence with:
$seq_object_array[$i]

but I dont want to read in the sequences both ways...

Thanks for you help...

Marco