[решено] Замена символа в строке, по номеру [PERL]

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- Вебмастеру (http://forum.oszone.net/forumdisplay.php?f=22)

Замена символа в строке, по номеру [PERL]

Здравствуйте.
Есть строка, допустим:

PHP код:


		
			
$somestring = "I have a BIG gun.";

Строка динамичная, тобиш постоянно меняется. Необходимо заменить в ней, к примеру 12-ый символ. Причём, что это за символ, нам не известно, известно только его номер в строке.
Подскажите, пожалуйста, как это можно реализовать в перле.

В php, делал так:

PHP код:


		
			
$somestring[12] = $somechar;

используйте функцию substr

Код:

$mystr = "I have a BIG gun.";

substr($mystr, 9, 3) = "little";

9 - начало замены
3 - сколько символов заменить