Had you built it in lisp it would have taken only 20 minutes!
http://homepage.mac.com/svc/LispMovies/index.html#2