Ok pessoal.. realmente ele arredonda msm!! :) sorry<br> Utilizei a alternativa sugerida pelo nosso amigo e grande Genio Nilson :)<br> <br> $num1 =~ s/^?(\d+\,\d{2}).*$/$1/;<br> $num22 =~ s/^?(\d+\,\d{2}).*$/$1/;<br> <br> Coloquei um ? na frente pois o numero pode ser negativo :)<br> <br> Obrigada pessoal<br> <br><br><b><i>Fernando &lt;fernandocorrea@gmail.com&gt;</i></b> escreveu:<blockquote class="replbq" style="border-left: 2px solid rgb(16, 16, 255); margin-left: 5px; padding-left: 5px;"> Nilson Santos Figueiredo Junior escreveu:<br>&gt; On 6/23/06, Igor Sutton Lopes <igor.sutton @gmail.com=""> wrote:<br>&gt;   <br>&gt;&gt; Vixe :) Então a melhor alternativa é utilizar uma regex:<br>&gt;&gt;<br>&gt;&gt; perl -e '$a = "1,43634"; $a =~ s/^(\d+\,\d{2}).*$/$1/; print $a'<br>&gt;&gt;     <br>&gt;<br>&gt; Não sei se a melhor alternativa seja uma regex, mas é o que eu faria<br>&gt; se eu não quisesse procurar muito. Mas deve ter algum módulo que<br>&gt; encapsula
 isso.<br>&gt;<br>&gt; Minha tentativa que eu achei um pouco mais "bonitinha". ;-)<br>&gt;<br>&gt; $num =~ s/(?&lt;=\.\d\d)\d+//;<br>&gt;<br>&gt; -Nilson Santos F. Jr.<br>&gt; _______________________________________________<br>&gt; Cascavel-pm mailing list<br>&gt; Cascavel-pm@pm.org<br>&gt; http://mail.pm.org/mailman/listinfo/cascavel-pm<br>&gt;<br>&gt;   <br>Uma melhorada:<br>perl -e '$a = "1.43634";print trunc($a, 2); sub<br>trunc(){return(int(shift()*($div=10**shift()))/$div)}'<br><br>_______________________________________________<br>Cascavel-pm mailing list<br>Cascavel-pm@pm.org<br>http://mail.pm.org/mailman/listinfo/cascavel-pm<br></igor.sutton></blockquote><br><p>&#32;
                <hr size=1> 
<a href="http://us.rd.yahoo.com/mail/br/tagline/copa/*http://br.esportes.yahoo.com/copa2006/">Yahoo! Copa 2006</a> - cobertura dos jogos em tempo real e tudo sobre a seleção brasileira!