for (1..5) {
  # select content of table $_ into temp table
}
for (1..10000) {
  # crosscheck with temp table
}