How about a book about modeling and simulation using Perl? Even if Perl isn't the best language for this, like the AI book suggested by Ovid it could still be used to explore the basic concepts.