in reply to 1,000 bucks

This was done on NPR's Cartalk a few months ago.

In Section Cool Uses for Perl