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?