RosettaCodeData/Task/File-input-output/Euphoria/file-input-output-2.eu

17 lines
229 B
Text
Raw Permalink Normal View History

2026-04-30 12:34:36 -04:00
integer in,out
object line
in = open("input.txt","r")
out = open("output.txt","w")
while 1 do
line = gets(in)
if atom(line) then -- EOF reached
exit
end if
puts(out,line)
end while
close(out)
close(in)