Select Code to Download

    return sub {$count++}

sub count_maker {
    my $count = shift;

{
  my $count1; ## only one copy of $count1 ever created, so
...
6 2 
2 3 
3 4