Select Code to Download

my $count = scalar @$expanded;
$expanded = [ 
...

push @$expanded,  @$expansion if $count == scalar @$expanded;

if ( $expanded->[0]{$parent_key} ) {
  push @$expanded,  @$children;
...
      }  @$children;
    } @$expanded ];
}