Sorry, tried all that with escaping - doesn't work either
???
> you may need the \Q for meta-character escape.
>
> for (keys %expan) {
> $sbl =~ s/\Q$_/$expan{$_}/g;
> }
>
> see also 'perldoc perlre' and search for '\Q'.
>
> 2007/8/27, Petra Vide Ogrin <[EMAIL PROTECTED]>:
>> Hi all,
>>
>> I have a hash and some prose text and want my perl to identify the keys
>> of
>> the hash in this text and replace them with the corresponding values of
>> the keys.
>>
>> I tried the following
>>
>> foreach (keys %expan) {
>> if ($sbl =~ m/$_/g) {
>> $sbl =~ s/$_/$expan{$_}/g;
>> }
>> }
>>
>> but it doesn't seem to work properly. What am I doing wrong?
>>
>> Thanks for the help,
>> best,
>> Petra
>>
>> --
>> To unsubscribe, e-mail: [EMAIL PROTECTED]
>> For additional commands, e-mail: [EMAIL PROTECTED]
>> http://learn.perl.org/
>>
>>
>>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
> http://learn.perl.org/
>
>
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
