#ex_07-1e
#Learning Perl Appendix A, Exercise 7.1e
/(^|\s)(\S+)(\s+\2)+(\s|$)/
