sub genclosure {
  my $bar;
  return sub { $bar++; }
}

##</code><code>##

sub genclosure {
  return sub { state $bar; $bar++; }
}