Front page | perl.fwp |
Postings from December 2001
Re: 1,000 anyone?
Thread Previous
|
Thread Next
From:
Simon Drabble
Date:
December 8, 2001 05:37
Subject:
Re: 1,000 anyone?
Message ID:
Pine.LNX.4.21.0112080831380.17582-100000@dragon.localdomain
On Fri, 7 Dec 2001, Bill Jones wrote:
> Given -
>
> ++$number while $number =~
> s/^([-+]?\d+)(\d{3})/$1,$2/,
> print "$number\n";
>
>
> Question:
> Why does it keep starting over at 1,000 ???
>
> Enjoy!
> -Sx- :]
>
>
as soon as $number hits 1000 you replace it with 1,000 which == 1 in numeric
terms (i.e. when evaluating the ++).
Si.
Thread Previous
|
Thread Next