The sample code and exercises from the book Intermediate Perl