As a beginner with perl, it would do you good to learn about the debugger. It would allow you to execute each line of your program one at a time, and inspect the values of variables to confirm that things are happening as you expect. That can be very useful when the problem is one like this, where you suspect the outer program is somehow changing something.