RosettaCodeData/Task/File-input-output/DCL/file-input-output.dcl
2023-07-01 13:44:08 -04:00

9 lines
173 B
Text

$ open input input.txt
$ open /write output output.txt
$ loop:
$ read /end_of_file = done input line
$ write output line
$ goto loop
$ done:
$ close input
$ close output