3 lines
88 B
Mathematica
3 lines
88 B
Mathematica
stream = OpenRead["file.txt"];
|
|
While[a != EndOfFile, Read[stream, Word]];
|
|
Close[stream]
|