For the book "Perl Hacks"