J'ai un hash de hash dont les clés du hash secondaire est l'organisme rechercher.


Voici mon idée de départ
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
my  %critical_organisms = (
	'Alternaria alternata'		=> {'Lewia_infectoria' => 1
					     'Ulocladium' => 1
					   },
	'Aspergillus fumigatus'		=> ,
	'Davidiella tassiana'		=> ,
);
 
...
	if ( exists ${$critical_organisms{$orga_consensus}}{$hit_name}){
 
	}
L'ennui est que $hitname ne contient pas identiquement la clé mais qu'il peut y avoir d'autres caractères à ses 2 extrémités.

J'ai donc essayé avec :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
	foreach my $crit_org (keys %{$critical_organisms{$orga_consensus}}){
 
		if ( $hit_name =~ m/$crit_org/){
 
		}
	}
Existe-il une solution plus simple en utilisant qr// ?


Merci,