sub create_iter { my ($code_ref, @rest) = @_; return sub {$code_ref->();} }