Select Code to Download

sub outer {
  my $helper;
...
  my $delay_cleanup = on_release {$helper = undef};
  $helper->(@_);
}

sub outer {
  my @helper;
...
  };
  $helper[0]->(@_);
}

{
  my %in_node;
...
    ...
  }
}