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 <[email protected]>
> Olá,
>
> 2011/1/15 Stanislaw Pusep <[email protected]>:
> > 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: [email protected]
> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> =end disclaimer
>
=begin disclaimer
Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
SaoPaulo-pm mailing list: [email protected]
L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
=end disclaimer
