http://www.perlmonks.org?node_id=2294

Tough beans.

More info