Na verdade este foi um exemplo que um amigo pegou na internet, ele me perguntou pq isso acontecia e eu não tive a mínima idéia.<br><br>Agradeço pela resposta :)<br><br><div><span class="gmail_quote">Em 10/01/08, <b class="gmail_sendername">
breno</b> &lt;<a href="mailto:breno@rio.pm.org">breno@rio.pm.org</a>&gt; escreveu:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Pq vc está pensando como C. Pense como VC! :-P
<br><br>$cor não é um índice, é uma cor! Vc nomeou certo, mas usou errado :-)<br><br>&quot;para cada cor em @cores, imprime... a própria cor!&quot;<br>ou, em Perl:<br><br>foreach $cor (@cores) {<br>&nbsp;&nbsp; print $cor . &quot;\n&quot;;
<br>}<br><br>isso deve fazer o que vc quer.<br><br>Ao pedir para o Perl imprimir $cores[$cor], vc está efetivamente<br>pedindo que ele imprima o item da lista @cores na posição &quot;azul&quot;,<br>depois na posição &quot;verde&quot;, depois na posição &quot;amarelo&quot;, e depois na
<br>posição &quot;vermelho&quot;. Essas strings, ao serem tratadas em contexto<br>escalar,<br>estão sendo avaliadas como 0 e, consequentemente, retornando $cores[0]<br>a cada iteração do seu foreach().<br><br>Entendeu? Se quiser manter o sotaque de C, pode tentar algo como:
<br><br>for ($i = 0; $i &lt; @cores; $i++) {&nbsp;&nbsp;&nbsp;&nbsp;# agora sim temos um índice!<br>&nbsp;&nbsp;&nbsp;&nbsp;print $cores[$i] . &quot;\n&quot;;<br>}<br><br>[]s<br><br>-b<br><br>On Jan 10, 2008 8:20 AM, Fabrício Firmino de Faria<br>&lt;<a href="mailto:firminodefaria@gmail.com">
firminodefaria@gmail.com</a>&gt; wrote:<br>&gt; Olá a todos, algué poderia me dizer pq o código:<br>&gt;<br>&gt; @cores = (&quot;azul&quot;,&quot;verde&quot;,&quot;amarelo&quot;,&quot;vermelho&quot;);<br>&gt;<br>&gt; foreach $cor (@cores) {
<br>&gt;&nbsp;&nbsp;&nbsp;&nbsp; print $cores[$cor],&quot;\n&quot;;<br>&gt; }<br>&gt;<br>&gt; imprime azul<br>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; azul<br>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; azul<br>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; azul<br>&gt;<br>&gt;<br>&gt; VLW<br>&gt;<br>&gt;<br>&gt;<br>&gt;
<br>&gt;<br>&gt; _______________________________________________<br>&gt; Rio-pm mailing list<br>&gt; <a href="mailto:Rio-pm@pm.org">Rio-pm@pm.org</a><br>&gt; <a href="http://mail.pm.org/mailman/listinfo/rio-pm">http://mail.pm.org/mailman/listinfo/rio-pm
</a><br>&gt;<br>_______________________________________________<br>Rio-pm mailing list<br><a href="mailto:Rio-pm@pm.org">Rio-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/rio-pm">http://mail.pm.org/mailman/listinfo/rio-pm
</a><br></blockquote></div><br>