Perl One-Liner of the Month: The Mystery of the Red Worm

By Ben Okopnik