Select Code to Download

use Tree::RB::XS;

...
}
my $iter= $t->iter;
printf OUT "%s\t%s\n", reverse $iter->next_kv while !$iter->done;