Avoid qw() in perl, deprecated behavior.