my $foo = MaybeADirectoryObject->new(@args)
    or die 'No object', $!;
# ...