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;

ABS()



2011/1/15 Eden Cardim <edencar...@gmail.com>

> perl -MO=Concise -le'print $destino . $prefixo . $data_backup .
> q{.tar.bz2};'
=begin disclaimer
   Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
 SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org
 L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
=end disclaimer

Responder a