http://perlmonks.org/index.pl?node_id=108949&user=sporty&svmode=edit