[Cascavel-pm] Soma

Igor Sutton igor.sutton em gmail.com
Segunda Julho 10 10:16:59 PDT 2006


Ups, entendi mal a questão :)

Acho que você pode fazer algo do tipo:

<code>
my @result;
my $tosum = "4:3:2:1";
my @nums = qw(1 2 3 4);
my @tosum = split(/:/, $tosum);

for (my $i=0; $i<@tosum;$i++) {
    push @result, $nums[$i] + $tosum[$i];
}

print "@result\n";
<code>

On 7/10/06, Thomas Britis <thomas em tcnet.com.br> wrote:
>
> Senhores,
>
>         Existe alguma forma de se fazer o seguinte:
> $c = "2:3";
>
> ($a, $b) += split (/:/, $c); ???
>
>         Quero somar o resultado do split em variáveis distintas.
> Hoje faço:
> ($x, $y) = split (/:/, $c); $a += $x; $b += $y;
>
>         Obrigado.
> --
> Thomas Storino Britis
> TCNet Informatica e Telecomunicacoes LTDA
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Igor Sutton Lopes
http://www.izut.com/
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20060710/8ec12ca7/attachment-0001.html 


Mais detalhes sobre a lista de discussão Cascavel-pm