RosettaCodeData/Task/Remove-lines-from-a-file/Zkl/remove-lines-from-a-file-2.zkl
2017-09-25 22:28:19 +02:00

8 lines
248 B
Text

fcn deleteLinesL(fname, start,num){
if (start < 1) throw(Exception.ValueError);
f:=File(fname);
do(start-1) { File.stdout.write(f.readln()) }
do(num) { f.readln(); }
f.pump(File.stdout.write);
}
deleteLinesL("nn.zkl", 2,5);