perl -ne 'print "YES\n" if /^[a-z0-9][a-z0-9.-]*[a-z0-9]$/ && /[a-z]/ && ! /\.\./'