my $last_60 = substr($str, -60);