Agreed that he needs to use strict, but isn't use warnings redundant with #!/usr/bin/perl -w?

For added clarity: I meant in substitution of -w.