on *:text:!change & &:#:{ var %a = 1 while %a <= $lines(file.txt) { var %line = $read(file.txt,ntw,$2,%a) var %line = $reptok(%line,$gettok(%line,2,32),$3,1,32) .write -l $+ $readn file.txt %line var %a = $readn } }