File input/output: Difference between revisions

no edit summary
(Rename Perl 6 -> Raku, alphabetize, minor clean-up)
No edit summary
Line 1,367:
CloseFile(f);
end;</lang>
 
=={{header|DIBOL-11}}==
<lang DIBOL-11>
START ;Simple File Input and Output
 
RECORD TEMP
INLINE, A72
 
 
PROC
OPEN (8,I,"input.txt")
OPEN (9,O,"output.txt")
 
 
LOOP,
READS(8,TEMP,END)
WRITES(9,TEMP)
GOTO LOOP
 
END,
CLOSE 8
CLOSE 9
 
END
</lang>
 
=={{header|E}}==