$ perl -le'
my $pattern = q/fox.+?jumps/;
my $regex   = qr/$pattern/;
print $regex;
'
(?-xism:fox.+?jumps)