<p dir="ltr">2013/3/23 Marcio Ferreira <<a href="mailto:marciodesouzaferreira@gmail.com">marciodesouzaferreira@gmail.com</a>><br>
>  <br>
>><br>
>> sub somaValor {<br>
>>     my ($a,$b)=undef;<br>
><br>
><br>
> Por que essa linha? Evitar problema com globais?<br></p>
<p dir="ltr">Até porque, somente "$a" está recebendo "undef", talvez você quisesse "my ($a,$b)=(undef, undef)" ou simplesmente "my ($a,$b)".</p>
<p dir="ltr">$ perl -E'$a=12;$b=15;($a,$b)=5;say $a,$b'<br>
5</p>
<p dir="ltr">faço muito: "my ($a,$b)=@_;" direto, o que pra mim é uma recomendação(lendo o <a href="http://modernperlbooks.com">http://modernperlbooks.com</a>, ele não tem )</p>