@total_words = split while (<DATA>);