Ups, entendi mal a questão :)<br>
<br>
Acho que você pode fazer algo do tipo:<br>
<br>
<code><br>
my @result;<br>
my $tosum = "4:3:2:1";<br>
my @nums = qw(1 2 3 4);<br>
my @tosum = split(/:/, $tosum);<br>
<br>
for (my $i=0; $i<@tosum;$i++) {<br>
push @result, $nums[$i] + $tosum[$i];<br>
}<br>
<br>
print "@result\n";<br>
<code><br>
<br><div><span class="gmail_quote">On 7/10/06, <b class="gmail_sendername">Thomas Britis</b> <<a href="mailto:thomas@tcnet.com.br">thomas@tcnet.com.br</a>> wrote:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Senhores,<br><br> Existe alguma forma de se fazer o seguinte:<br>$c = "2:3";<br><br>($a, $b) += split (/:/, $c); ???<br><br> Quero somar o resultado do split em variáveis distintas.<br>Hoje faço:<br>
($x, $y) = split (/:/, $c); $a += $x; $b += $y;<br><br> Obrigado.<br>--<br>Thomas Storino Britis<br>TCNet Informatica e Telecomunicacoes LTDA<br>_______________________________________________<br>Cascavel-pm mailing list
<br><a href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/cascavel-pm">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br></blockquote></div><br><br clear="all"><br>
-- <br>Igor Sutton Lopes<br><a href="http://www.izut.com/">http://www.izut.com/</a>