I always thought it would be cool to see if a 100 monkies could make a perl script. Something like:

1. type random text
2. eval code (could be a `rm -rf *`, but hey, live a little)
3. save code if eval is good
4. back to 1

I never tried to implement this because I was afraid that it would steal my job :)