sub definedor
{
  defined $_[0] ? $_[0] : $_[1]
}

##</code><code>##

sub definedor
{
  use List::Util qw(first);
  first { defined } @_
}