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