Do what you want with these, I don't care. (Does that count as a dedication to the public domain?)
perl -e 'foreach $char (split //, <>) { print "&#" . ord($char) . ";" } print "\n"'perl -e 'printf "%s\n", join("" => map [0..9, a..z]->[rand 36], 1..8)'