Select Code to Download

{
   my $val;
...
      return $val;
   }
}

sub create_func {
   my $val = shift;
...
my $increment_coderef = create_fund(1);
my $value = $increment_coderef->(); #returns 2
my $value = $increment_coderef->(); #returns 3