http://www.codeproject.com/perl/camel_poop.asp