>>>>> "Stanislaw" == Stanislaw Pusep <[email protected]> writes:
Stanislaw> Gosto é gosto :) Das 3 alternativas, para esse caso
Stanislaw> específico (montar o nome do arquivo), a 3-a me parece
Stanislaw> mais legível:
Stanislaw> my $out = $dir . '/' . $prefix . '_' . $name . '-' . $pid .
'.log';
Stanislaw> my $out = "${dir}/${prefix}_${name}-${pid}.log";
Stanislaw> my $out = sprintf '%s/%s_%s-%d.log', $dir, $prefix, $name, $pid;
A solução "mais correta" em termos de portabilidade, é usar algo como o
File::Spec ou Path::Class, que também acaba sendo mais legível, IMO.
File::Spec->catfile($dir => $prefix.$name.$pid.'.log');
--
Eden Cardim
Software Engineer
+55 73 9986-3963
edencardim.com
=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
