if (( defined $buf ) && ($buf =~ /\w/))