Disclaimer

Code posted by on PerlMonks, unless otherwise specified, is subject to the following:

1. it is example code only; it has likely not been tested, and may not have even been checked with perl -c -- therefore, it comes without warranty of any kind
2. it may not be the best solution; sometimes I post known sub-optimal code as a matter for consideration, and sometimes it's just my own lack of knowledge or experience
3. it is released into the public domain for any use; however, I would appreciate attribution for anything particularly novel