$var =~ s/$lhs/$rhs/ee;

##</code><code>##

$var =~ s/$lhs/eval $rhs/e;

##</code><code>##

$rhs = '"$1$2$3"';

##</code><code>##

$rhs = '$1.$2.$3';