perldoc perlfaq1 | perl -ne '/((?<=")(.+hack...(?:OR)?))/&&die$2.$/' - [download]
See also One-liner japh, Just Another JAPH, Opere Citato Japh, and JAPF for the same idea (some of these only work with older versions of perl though).
Your first Perl Book - the first one ever Average number of caffeinated beverages per work day - the poll with the highest participation My Thoughts on the New Voting/Experience System - the poll with the fewest votes cast When I grow up, I want to be: - one of the polls with the fewest options Perl 6 will primarily be: - the first one on Perl6 When I see a poll - one of the many polls about polls this poll ;-) yet to come none - I hate polls. Bah. some other
Results (49 votes), past polls