Re: a sub within a sub -- revisiting

[Anonymous Monk]

bar is still visible outside of foo, so make it lexical

sub foo {

  my $bar =     sub {
        my ($i) = @_;

        push @arrb, $arra[$i];
        
  };

  $bar->($#arra);

  ...
}

[ikegami]

Note that the above leaks if the anon sub accesses $bar. That would be the case if the anon sub is recursive, for example. I find the following simpler, and it doesn't leak.

sub foo {
   ...

   local *bar = sub {
      ...
   };

   bar(...);
}