For the book "perl best practices"