Help for this page
DB<1> %hash = (jan => 1, feb => 2, mar => undef, apr => undef, may = +> 5); DB<2> x %hash ... 3 DB<4> print scalar grep {defined $_} keys %hash; 5