Is there a common module that already has the first_defined(LIST) function implemented? I could just stick my own function into an application local util:: namespace but I'd rather just use someone else's code and not have to deal with it. Like List::Common::Something or whatever that module is named. I don't recall.

# Sample implementation
# This function returns the first defined() element of its argument li
+st.
sub fdef { defined() && return $_ for @_ }
[download]