Oh, and if anyone's interested and wants to play with it, I can post my script here. But sorry, it's in Haskell.