Examples from http://www.adp-gmbh.ch/perl/word.html