| Next | Pigs in Space | 17 |
Millicents (m¢)
All money amounts are integers
A $20 Pobox account consumes its available funds at a rate of int(dollars(20)/365) millicents per day
That is, exactly 5479 m¢ each day
sub cents { $_[0] * 1000 }
sub dollars { $_[0] * 1000 * 100 }
is($Consumer->unapplied_amount, cents(95), "now \$0.95");
| Next |  |
Copyright © 2013 M. J. Dominus |