Read a file line by line: Difference between revisions
Content added Content deleted
| Line 2,130: | Line 2,130: | ||
end do:</lang> |
end do:</lang> |
||
=={{header|Mathematica}}== |
=={{header|Mathematica}}/{{header|Wolfram Language}}== |
||
<lang Mathematica> |
<lang Mathematica>strm=OpenRead["input.txt"]; |
||
strm=OpenRead["input.txt"]; |
|||
If[strm=!=$Failed, |
If[strm=!=$Failed, |
||
While[line=!=EndOfFile, |
While[line=!=EndOfFile, |
||
| Line 2,138: | Line 2,137: | ||
(*Do something*) |
(*Do something*) |
||
]]; |
]]; |
||
Close[strm]; |
Close[strm];</lang> |
||
</lang> |
|||
=={{header|MATLAB}} / {{header|Octave}}== |
=={{header|MATLAB}} / {{header|Octave}}== |
||