Add tests for Useperl(undef).