Comments on Raphinou's blog: Generate a random string in Clojure

This is my version: (defn random-string [length] ...

2011-05-25T08:30:53.884+02:00

This is my version:

(defn random-string [length]
(let [ascii-codes (concat (range 48 58) (range 66 91) (range 97 123))]
(apply str (repeatedly length #(char (rand-nth ascii-codes))))))

2011-05-25T08:30:36.599+02:00

This comment has been removed by the author.

Yeah, now we can use rand-nth, but this function w...

2011-01-13T09:25:32.382+01:00

Yeah, now we can use rand-nth, but this function wasn't around when I first commented.

Jeff, your random-char function could be simplifie...

2011-01-13T03:31:43.841+01:00

Jeff, your random-char function could be simplified like this:

(defn random-char []
(random-nth VALID-CHARS))

Jeff, I think you meant: (range 65 91) ; A-Z Don...

2010-08-05T23:57:45.066+02:00

Jeff, I think you meant:

(range 65 91) ; A-Z

Don't want to forget A!

A slightly modified version, without using Java's ...

2009-05-02T13:41:00.000+02:00

A slightly modified version, without using Java's random and with corrected ranges for the characters. (Annoying that blogger won't allow code or pre tags...)

(def VALID-CHARS
(map char (concat (range 48 58) ; 0-9
(range 66 91) ; A-Z
(range 97 123)))) ; a-z

(defn random-char []
(nth VALID-CHARS (rand (count VALID-CHARS))))

(defn random-str [length]
(apply str (take length (repeatedly random-char))))