What's the best way to find min and max values in an array with undefined members without getting error messages?

# perl -e '
use warnings;
use List::Util qw(min);
printf("%d\n", min(1, undef));
'
Use of uninitialized value in subroutine entry at -e line 1.
Use of uninitialized value in printf at -e line 1.
0


Are there alternative min and max functions that skip undef array
members, or I'm better off to write my own?

-- 
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/