my $found; $string =~ m/(.{60})\z/s and $found = $1;