Anonymous user
Fixed length records: Difference between revisions
REBOL version
Catskill549 (talk | contribs) |
(REBOL version) |
||
Line 1,091:
1+1 records out
</pre>
=={{header|REBOL}}==
<lang REBOL>
inp: open %infile.dat
out: open/new %outfile.dat
while [ not empty? line: copy/part inp 80 ][ write out reverse line ]
close inp
close out
</lang>
|