$string =~ s/(\Q$first\E).*?(\Q$last\E)/$1$reserve$2/;