Discussion :

[sone47]

Bonjour a tous,

une petite question pour savoir comment pouvoir stocker une expression reguliere dans une variable.
Un exemple (qui ne fonctionne pas):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
...
if($input_file eq "file1.asm"){
	$regex=".*DW.*sec\.(\S*).\W*(\d*)"; 	
}
elsif($input_file eq "file2.asm"){			
	$regex=".*br.*sec\.(\S*).\W*(\d*)"; 
}		
while($line = <FIC>)
{ 
       if($line =~ /$regex/){ 
...

Y a t il possibilité de faire dans cette direction?

Merci beaucoup d'avance

Cordialement
Guillaume

[Jedai]

Tu peux utiliser qr// pour stocker une regex précompilée dans une variable, c'est la meilleure option (sinon tu peux utiliser des strings normale mais la regex ne sera pas précompilée et le système d'échappement n'est pas le même que dans une vraie regex) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
if($input_file eq "file1.asm"){
	$regex = qr/.*DW.*sec\.(\S*).\W*(\d*)/; 	
}
elsif($input_file eq "file2.asm"){			
	$regex = qr/.*br.*sec\.(\S*).\W*(\d*)/; 
}		
while($line = <FIC>)
{ 
       if($line =~ m/$regex/){ 
...

--
Jedaï

[sone47]

Merci beaucoup,
c'est parfait!