RosettaCodeData/Task/Word-frequency/Smalltalk/word-frequency-1.st

3 lines
124 B
Smalltalk

(StandardFileStream new open: 'lesms10.txt' forWrite: false)
contents asLowercase substrings asBag sortedCounts first: 10.