[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