in reply to Check for non blank entry

If nothing was entered, your $value might be undefined so better to do (defined $value and $value =~ /\S/).

In Section Seekers of Perl Wisdom