You want substr.

my $string = 'perl345';
my $tag = substr $string, -3;
[download]

Or if you want to remove the last three characters, too,

my $string = 'monks 1223';
my $tag = substr $string, -3, 3, '';
[download]