How to randomize letters in a word
Haskell, 110 120 107 characters

import Random
s l=randomRIO(1,length l-2)&gt;&gt;=g.($l).splitAt
g(a:b,c:d)=fmap(a:).s$c:b++d
g(a,b)=return$a++b


An example of a program using this function:

main = getLine &gt;&gt;= s &gt;&gt;= putStrLn