on fakeMail (nOfMails = "20", breakS = ", ", prefix = "", postfix = "") { local { tldList = {"com", "net", "org", "mil", "edu", "de", "biz", "de", "ch", "at", "ru", "de", "tv", "com", "st", "br", "fr", "de", "nl", "dk", "ar", "jp", "eu", "it", "es", "com", "us", "ca", "pl"}; nameLength, serverNameLength, i, mailName, serverName, tldName, myMail, j; result = ""}; on makeName(n) { local (i, s = ""); for i = 1 to n { s = s + char(random(97, 122))}; return s}; for j =1 to nOfMails { nameLength = random(3, 10); mailName = makeName(nameLength); serverNameLength = random(4, 20); serverName = makeName(serverNameLength); tldName = tldList[random(1, sizeOf(tldList))]; myMail = mailName + "@" + serverName + "." + tldName; myMail = "" + myMail + ""; if j == nOfMails { result = result + myMail} else { result = result + myMail + breakS}}; return prefix + result + postfix};