integers.pl

#!/usr/bin/perl 

use v5.16;
use warnings;
use bigint;
use Lingua::EN::Numbers;

sub output {
    my $i = shift;
    say $i, "\t", Lingua::EN::Numbers::num2en($i);
}

foreach my $i ( 0..99 ) {
    output($i);
}

for ( my $i = 100; $i < 10**33; $i += int rand(2 * $i) ) {
    output($i);
}

Sample output at https://gist.github.com/mavit/8475644.