BOOK GIVEAWAY: Perl One-Liners: 130 Programs That Get Things Done