Try running your program in debug mode and step trough it. Watch wich variable is undefined at the time you get the warning.
Refer to perldoc perldebug for instructions on how to use the built in debugger.

/brother t0mas