7 lines
404 B
Text
7 lines
404 B
Text
fname,count := vm.arglist; // grab cammand line args
|
|
|
|
// words may have leading or trailing "_", ie "the" and "_the"
|
|
File(fname).pump(Void,"toLower", // read the file line by line and hash words
|
|
RegExp("[a-z]+").pump.fp1(Dictionary().incV)) // line-->(word:count,..)
|
|
.toList().copy().sort(fcn(a,b){ b[1]<a[1] })[0,count.toInt()] // hash-->list
|
|
.pump(String,Void.Xplode,"%s,%s\n".fmt).println();
|