$string = "pre replace post"; $i = 4; $j = 11; $length = $j - $i; substr($string, $i, $length) = "x" x $length; print "$string\n"; #### $string = "pre replace post"; $i = 4; $j = 11; substr($string, $i, $j - $i) =~ tr/x/x/c; print "$string\n";