Obrigada :D<br>Esse programa tem strict e warnings :D eh que coloquei um pedaço somente <br><br>Obrigada<br><br><b><i>Nelson Ferraz &lt;nferraz@gmail.com&gt;</i></b> escreveu:<blockquote class="replbq" style="border-left: 2px solid rgb(16, 16, 255); margin-left: 5px; padding-left: 5px;"> Em Sep 3, 2007, às 2:54 PM, Patty Silva escreveu:<br><br>&gt; Para eliminar tudo que esta antes do . eu fiz:<br>&gt;  foreach $campo (@fields)<br>&gt;     {<br>&gt;     $campo=~ s/\.(\w*)//;<br>&gt;     push(@variaveis,$1);<br>&gt;<br>&gt;     }<br>&gt;<br>&gt; tem como eu eliminar sem usar o foreach :D<br><br>Tem.<br><br>Em geral, quando você quiser transformar uma array, você pode (deve)  <br>usar "map".<br><br> my @new_array = map { do something with $_ } @old_array;<br><br>Por exemplo:<br><br> my @clean_fields = map { /\.(.+)$/ } @fields;<br><br>Esta é apenas uma forma, existem inúmeras maneiras diferentes.<br><br>Mas o seu código continuará errado enquanto você não colocar "strict" 
 <br>e "warnings" no começo do seu programa.<br><br>(E eu me vejo obrigado a repetir sempre a mesma cantilena, para que  <br>esse mau exemplo não seja repetido por outras pessoas -- estas sim,  <br>eu espero, capazes de aprender.)<br><br>_______________________________________________<br>Cascavel-pm mailing list<br>Cascavel-pm@pm.org<br>http://mail.pm.org/mailman/listinfo/cascavel-pm<br></blockquote><br><p>&#32;


      Flickr agora em português. Você clica, todo mundo vê. <a href="http://br.rd.yahoo.com/mail/taglines/flickr/*http://www.flickr.com.br/">Saiba mais</a>.