if (/$name/ismo) {

##</code><code>##

use re 'eval';
$code = 'foo(?{ $x })';
/$code/