That particular bit isn't scripted (I just haven't gotten around to write a script for it) but a bunch of other things are the site are done with perl scripts.