Eban numbers: Difference between revisions
→{{header|Perl 6}}: Doh. Fix stupid error.
Thundergnat (talk | contribs) (→{{header|Perl 6}}: make it more modular and easily customizable) |
Thundergnat (talk | contribs) (→{{header|Perl 6}}: Doh. Fix stupid error.) |
||
Line 48:
for 'e', 't' -> $n {
my @ban = flat ((1 ..
my @orders = ( (
for @orders -> @order {
Line 105:
From 1,000 to 4,000: 0
========================================
Up to 10,000:
========================================
Up to 100,000:
========================================
Up to 1,000,000:
========================================
Up to 10,000,000:
========================================
Up to 100,000,000:
========================================
Up to 1,000,000,000:
========================================</pre>
|