Использование or и блока на PERL

> Почему после or нельзя юзать блок операторов???

        $sth->execute() or do {logg("Error"); die;}

вот так будет работать.

$sth->execute() or logg("Error") and die;

Должно работать по идее.

> $sth->execute() or logg("Error") and die;
> Должно работать по идее.

только если logg() вернет true.

можно еще

       $sth->execute() or logg("Error"), die;

Всем спасибо!

Еще красивей можно:

logg("Error"), die unless $sth->execute();

Почти речь ;)

Да, тут я погорячился... В случае тяжелой аварии очень даже логгер может поломаться. Любовь к красотам подвела 8)