$ = open(1,"\\sutil\images$\rename\test.txt")
$ = open(2,"\\sutil\images$\rename\test.tmp",5)
$ = open(3,"\\sutil\images$\rename\conflicts.txt",5)

$line=readline(1)
while @error = 0 and not $match
 if instr($line,@wksta) or instr($line,@mac)
  if not instr($line,@mac + " = " + @wksta)
   $ = writeline(3,@mac + " = " + @wksta + @crlf)
  endif
  $match=1
 endif
$=writeline(2,$line+@crlf)
$line=readline(1)
loop
if not $match
 $=writeline(2,@mac + " = " + @wksta + @crlf)
endif
$=close(1)
$=close(2)
$=close(3)
del "\\sutil\images$\rename\test.txt"
move "\\sutil\images$\rename\test.tmp" "\\sutil\images$\rename\test.txt"