Help for this page
0 0 0 1 0 0 ... 0 1 1 0 2 1 (etc)
my @odometer = (0, 0, 0);
while_odometer_has_not_run_to_completion... { $id2++; ... ); next_odometer( \@odometer ); }