[Cascavel-pm] Melhorar a leitura de números grandes.

Frederico Recsky frederico em gmail.com
Terça Julho 3 12:46:45 PDT 2007


Olá

http://search.cpan.org/~wrw/Number-Format-1.52/Format.pm

Inclusive achei esse modulo legal e to testando aqui.

On 7/3/07, fernandolouis em terra.com.br <fernandolouis em terra.com.br> wrote:
> Acho que estou usando um metódo meio "tabajara" (ehehe) pra botar um "." em
> números que vão de 1000 à 99999.
>
> $cnumber = 1500;
>
>     if (length($cnumber) == 4) {
>       @ponto = split(//,$cnumber);
>       $ponto[4] = $ponto[3];
>       $ponto[3] = $ponto[2];
>       $ponto[2] = $ponto[1];
>       $ponto[1] = ".";
>       $result = join("", em ponto);
>     }
>
> print "$result"; # imprime 1.500
>
> # -------------------------------- #
>
> $cnumber = 25100;
>
>     if (length($cnumber) == 5) {
>       @ponto = split(//,$cnumber);
>       $ponto[5] = $ponto[4];
>       $ponto[4] = $ponto[3];
>       $ponto[3] = $ponto[2];
>       $ponto[2] = ".";
>       $result = join("", em ponto);
>     }
>
> print "$result"; # imprime 25.100
>
>
> alguma maneira mais simples?
>
> []s,
> Fernando
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>


-- 
____________________________
Frederico Recsky
Linux User: #253572
http://www.fred.eti.br
http://www.perl.org.br


Mais detalhes sobre a lista de discussão Cascavel-pm