Adding to what ree already pointed out: If you would have used use warnings; in your code, Perl would have told you about the problem.