Better to use "no warnings qw(uninit).