if ($_ =~ /\w{10,}/io)