Galera, de boa... Por que todo programador de Perl tem aversão ao velho e bom printf()?!<br><br>my $backup_nome = sprintf '%s%s%s.tar.bz2', $destino, $prefixo, $data_backup;<br><br>ABS()<br><br>
<br><br><div class="gmail_quote">2011/1/15 Eden Cardim <span dir="ltr"><<a href="mailto:edencardim@gmail.com">edencardim@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin: 0pt 0pt 0pt 0.8ex; border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">
perl -MO=Concise -le'print $destino . $prefixo . $data_backup . q{.tar.bz2};'</blockquote></div><br>