从Perl中的字符串中提取最后K个字符

Question

我有一个看起来像这样的字符串

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

我想要做的是提取最后三个字符 从每一个。

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

如何在Perl中完成？

Answer 1

使用substr：

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