[RostovOnDon.pm] Очумелые ифы.

[Rosotov-on-Don Perl Mongres]

Если по мне, то не очень :)

   - двойное объявление переменной $dbfile, что ведет очистке переменой во
   втром случае
   - да-а, мы обсуждали на обеде в первый день YAPC, что shift - быстрей
   работает
   - доступ к конфе без указания хеша - мне твоя магия не понравилась :)
   - CamelCase - вообще зло для Perl'а - perlstyle!

Я бы твою функцию написал так:

sub open_database {
    my $self = shift;
    for (CFG->TmpStorage.'/'.$self->{Name}.'.db') { # shift || ...
        $self->OpenExistsDatabase($_) || $self->RecoverBackupDatabase($_) ||
$self->CreateNewDatabase($_) || die "$! $_";
        return $self->{$_};
    }
}

если все-таки нужен второй параметр, то для for - shift || ...

3 июня 2008 г. 3:10 пользователь Ivan B. Serezhkin <ivan на serezhkin.com>
написал:

> Привет.
> Что скажете  ?
> Ну окромя того, что КамельКейс - это плохо ?
> sub OpenDatabase { # returns open dbfile with backup restoring workaround
>    my ($self,$dbfile)=@_;
>    my $dbfile||=CFG->TmpStorage.'/'.$self->{Name}.'.db';
>    (
>     $self->OpenExistsDatabase($dbfile)
>     or $self->RecoverBackupDatabase($dbfile)
>     or $self->CreateNewDatabase($dbfile)
>    ) and return $self->{$dbfile};
>    die "$! $dbfile ";
> }
>
>
> --
> Ivan B. Serezhkin
>
> _______________________________________________
> RostovOnDon-pm mailing list
> RostovOnDon-pm на pm.org
> http://mail.pm.org/mailman/listinfo/rostovondon-pm
>



-- 
С уважением,
Анатолий Шарифулин.
----------- следущая часть -----------
Вложение в формате HTML было извлечено&hellip;
URL: http://mail.pm.org/pipermail/rostovondon-pm/attachments/20080603/52533962/attachment.html