[SP-pm] Reduzir código repetido.

[Stanislaw Pusep]

Gosto é gosto :)
Das 3 alternativas, para esse caso específico (montar o nome do arquivo), a
3-a me parece mais legível:

my $out = $dir . '/' . $prefix . '_' . $name . '-' . $pid . '.log';
my $out = "${dir}/${prefix}_${name}-${pid}.log";
my $out = sprintf '%s/%s_%s-%d.log', $dir, $prefix, $name, $pid;

ABS()



2011/1/15 Frederico Recsky <listas em imovlr.com>

> Olá,
>
> 2011/1/15 Stanislaw Pusep <creaktive em gmail.com>:
> > Galera, de boa... Por que todo programador de Perl tem aversão ao velho e
> > bom printf()?!
> >
> > my $backup_nome = sprintf '%s%s%s.tar.bz2', $destino, $prefixo,
> > $data_backup;
>
> my $backup_nome = $destino . $prefixo . $data_backup. "tar.bz2";
>
> Estamos em 2011 já e esse dialeto "czista" de perl é ruim de ler. Até
> porque eu quero concatenar, sprintf recebe uma lista e formata como o
> primeiro argumento. É diferente.
>
> -- Frederico Recsky
> http://frederico.us/devel
> =begin disclaimer
>   Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
>  SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
>  L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> =end disclaimer
>
-------------- Pr�xima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20110116/0d382756/attachment.html>