Perl Reference:substr

$mojiretsuが ABCDEFGHIJKLMN のとき
substr($mojiretsu, 5, 3)は FGH を返す

開始位置	0	1	2	3	4	5	6	7	8	9	10	11	12	13
$mojiretsu	A	B	C	D	E	F	G	H	I	J	K	L	M	N

substr($mojiretsu, 5)は FGHIJKLMN を返す
長さを省略した時には文字列の末尾までを返す。

substr($mojiretsu, 5, -2)は FGHIJKL を返す。
長さがマイナスのときには、文字列の末尾から長さ文字を残した値を返す。

substr($mojiretsu, -5, -2)は JKL を返す
開始位置が文字列の末尾5文字目から、文字列の末尾2文字を残す。

substrは文字列を取り出すだけでなく、挿入したり置き換えたりすることもできる。

substr($mojiretsu, 0, 0) = "123";とすると
$mojiretsuは 123ABCDEFGHIJKLMN となる。
$mojiretsuの先頭(0)の長さを0文字と、文字列123を置き換える。

substr($mojiretsu, 3, 5) = "456"
上は開始位置は3(D)、長さは5文字なのでDEFGHを指す。
結果は ABC456IJKLMN となる。

substr($mojiretsu, 3, -5) = "789"
上は開始位置は3(D)、長さは-5文字なのでJKLMNを指す。
開始位置は3で、文末から5文字を残して置き換えている。
結果は ABC789JKLMN となる。

主な substr 使用ページ