unless ($text =~ /[a-zA-Z\s]{10,}/s) {
If you're here checking if $text has at least 10 letters/spaces, you don't
need the range
unless ($text =~ /[a-zA-Z\s]{10}/s) {
does the same thing. There may well be more than 10 (one would hope so ;-)
but the 2nd will match anyone the first will match and
Thanks so much for pointing that out.
After 15 years of Perl I am still learning, though much
slower than before. I still use Perl every day - most
for mapping of cemeteries, caves, springs, etc. But also
for basic text manipulation and may other things. It sure
has served me well over these