RosettaCodeData/Task/Pick-random-element/Oforth/pick-random-element.oforth

: pickRand(l)   l size rand l at ;