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