my $regex = 'PATTERN';
s/$regex/.../;