Select Code to Download

sub recurse_inorder {
  my $self=shift;
...
  $sub->($self);    # Added due to [dragonchild]s eagle eye
  return \@inorder;
}