You can't do that. You cannot interpolate variables in random places in the program, and assume the parsing isn't going to happen until runtime. This is Perl, not a shell.

But this should work:

if ($string =~ /(?$mod)$regex/) {
    ...
}
[download]