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