How to use a variable as substitution text in a perl regex

[grinny]

Hi,

I have a hash of variables with the name of the variable as key. Now I have some strings that can contain a $-sign followe d by a variable name. I would like to have the variables replaced with their values. I've tried the following with no succes:

$value =~ s/\$([a-z.]+)/$db[$1]/g;

Does anyone know how to do this?

 

[stevexff]

eval()

 

[TrojanWarBlade]

$value =~ s/\$([a-z.]+)/$db{$1}/ge;

Trojan.

 

[KevinADC]

you are using [] (for arrays) when you should be using {} (for hashes) as Trojan showed you:

$db[$1]

should be :

$db{$1}

 

[ishnid]

Nitpick: There's no need for the /e on the end of the regexp. $db{$1} works fine in a double-quoted string (which is what the RHS of a replacement regexp is).

 

[TrojanWarBlade]

ISHNID!
Nice to see you again!
Had to be a nitpick though (but you're right). ;-)

hehehe



Trojan.