Извлечение последних K символов из строки в Perl

Question

У меня есть строка, которая выглядит как этот

my $str1 = "ACGGATATTGA"; 
my $str2 = "alex"; 

То, что я хочу сделать, это извлечь последние три символа от каждого из этого.

$out1 = "TGA"; 
$out2 = "lex"; 

Как я могу это сделать в Perl?

Answer 1

Использование substr:

$out1 = substr($str1, -3);