Read a file line by line: Difference between revisions

Content added Content deleted
(Added Frink)
No edit summary
Line 632: Line 632:
puts line
puts line
end</lang>
end</lang>

=={{header|Scheme}}==
<lang scheme>; Commented line below should be uncommented to use read-line with Guile
;(use-modules (ice-9 rdelim))

(define file (open-input-file "input.txt"))
(do ((line (read-line file) (read-line file))) ((eof-object? line))
(display line)
(newline))</lang>


=={{header|Tcl}}==
=={{header|Tcl}}==