$_ = $var;
eval "s/$lhs/$rhs/";

##</code><code>##

eval "$var =~ /$lhs/$rhs/;";