my $even = create_iter(sub {my $c; $c += 2; return $c;},  0);   #  Does NOT work