perl: use "use warnings" instead of -w