Example code books "Learning Perl"