sub foo {
   ...

   local *bar = sub {
      ...
   };

   bar(...);
}