i tried it, but it doesn't.
it's still the same problem .

i put the PCIP under the "do"

Code:

 $ = open(2, $liste) ;opens the file liste.txt

$Line = split(readline(2),"; ")

do

:PCIP

	$PC = trim($line[0]) 

	$ret = writeline (1, "PC-Name ausgelesen.........$PC"+@CRLF)

now the whole scripts works, except the end.
it changes all IP-Adresses, and takes the whole list.
but instead of going to end when the list worked up, i get this error