in reply to get last characters out of string?
Another possibility. ...this one caters to the irrational fear of substr:
my $found; $string =~ m/(.{60})\z/s and $found = $1; [download]
Dave