for (grep defined($_), (sort keys %db)[-100 .. -1]) {