Help for this page

Select Code to Download

Select or download this

use Sub::Name;

...
   *$name = $func;
   goto $func;
}