Bareword found where operator expected at prog.pl
 line 1544, near ") NE"
        (Missing operator before NE?)
syntax error at prog.pl line 1544, near ") NE "
syntax error at prog.pl line 1548, near "else"
Execution of dni aborted due to compilation errors.

##</code><code>##

while (($var1 = index ($var2, $var3)) NE -1 )