To create a password a la xkcd:
perl -le '@w=<>;chomp@w;print join" ",map{$w[rand@w]}1..4'</usr/share/
+dict/words
But then I get bizarre combinations like "revolutionizer ananda Pleurobrachiidae squaller" - I don't care what xkcd says, I'm not remembering that one. :)
Update: Slightly better, though a bit nasty to whoever owns the domain...
perl -MLWP::Simple -lE '@w=get("http://jbauman.com/gsl.html")=~/^\d+\s
++\d+\s+([a-z]+)/xmsg;say join" ",map{$w[rand@w]}1..4'
which gets me, as an example, "rather weight decay punctual". Much easier to memorise. I think I might keep this one :-)