Reddit clone in 4 lines of perl: http://gist.github.com/299579