Help for this page
>perl -wMstrict -lne "@::i{ /\w+/g } = () }{ print for keys %::i" words2.txt ... baz qux foo