($output = $string) =~ s/$regexp/$new/$suffix;