Remove the "-w" from the first line and add a "use warnings;" line just below it. It won't work on older versions of Perl, but it has been several years now so it will quite likely work for you.

Type in the command "perldoc perllexwarn" ("perldoc warnings" would have directed you there) if you'd like to read lots more about this including why what I suggested makes a difference.