$dom = qr{
          [a-z]       # starts with a letter
          [a-z0-9-]*  # zero or more letters, numbers, hyphens
         }xi;