Nested quantifiers in regex; marked by <-- HERE in m/(.*{ <-- HERE 41})$/ a

##</code><code>##

/(.{41})$/

##</code><code>##

$last_41 = substr $buffer, -41;