[SP-pm] DIE - Módulo Autoritários

Nelson Ferraz nferraz at gmail.com
Tue Aug 26 11:48:00 PDT 2008


> Haaaa fio passa amanhã, vou fazer assim:
>
> #!/usr/bin/perl
>
> eval {
>
> ...
>
> };
>
> $@ && print 'Foda viu'.$/

Não recomendo essa construção -- usar o "&&" no lugar de um "if"
apenas dificulta o que poderia ser mais claro:

if ( $@ ) {
    print "Erro ao abrir o arquivo '$filename': $@\n";
}


O Luis recomendou o idioma: eval { ... } or do { ... }. Também não
gosto muito dessa alternativa, pois o eval pode efetivamente retornar
um valor falso, sem que isso seja um condição de erro. Exemplo:

my ($x,$y) = (0,1);

eval {
    my $z = $x / $y;
} or do {
    print "Erro: '$@'\n";
}


[]s


More information about the SaoPaulo-pm mailing list