This is a test case to reproduce a bug I've encountered. Please see the corresponding question on Stack Overflow. If you have any ideas, please post an answer or comment there.
This software is copyright (c) 2012 by Christopher J. Madsen.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.