# ex_07-1e

# Learning Perl on Win32 Systems, Exercise 7.1e



/(^|\s)(\S+)(\s+\2)+(\s|$)/