my $home = defined( $args->{home} ) ? $args->{home} : 
	     defined($args->{house}) ? $args->{house} :
	     confess(q{Can't determine home});

##</code><code>##

my $home = $args->{home} // $args->{house} // confess(q{Can't determine home});

##</code><code>##

my $home = $self->can('home') ? $self->home : 
	    $self->can('house') ? $self->house(1) : 
	    confess(q{Can't determine home});

##</code><code>##

my $home = $self->cando('home') // $self->cando('house',1) // confess(q{Can't determine home});