my temp4ev = '$'.$fromUserNumber; @simMatches = map{$_ =~ s/$pat/eval($temp4ev)/e} @simMatches;