my $diff = Algorithm::Diff->new( [<IN1>], [<IN2>] );

##</code><code>##

    sub cvIterToList {
        my $cvIter = shift( @_ );
        my @list;
        my $item;
        while(  defined( $item= $cvIter->() )  ) {
            push @list, $item;
        }
        return \@list;
    }

##</code><code>##

    my $diff = Algorithm::Diff->new(
        cvIterToList($iter), [<IN>] );

##</code><code>##

    cvIterToList( sub { $obj->Next() } )