4 lines
109 B
Text
4 lines
109 B
Text
while /= :eof dup !read-line!stdin:
|
|
!print( "Read a line: " !decode!utf-8 swap )
|
|
drop
|
|
!print "End of file."
|