[Chicago-talk] Array::Diff

[Young, Darren]

Anyone used Array::Diff before? I have the following but am getting back
ref's for the arrays:

        # determine additions and removals from the list
        @curmembers = sort(@curmembers);
        @newmembers = sort(@newmembers);
        my $diff = Array::Diff->diff( \@curmembers, \@newmembers );
        my @addmembers = $diff->added;
        my @delmembers = $diff->deleted;

        logmsg("Adds: " . scalar(@addmembers));
        logmsg("Dels: " . scalar(@delmembers));

        foreach my $add (@addmembers) {
            logmsg("ADD MEMBER: $add");
        }       
        foreach my $del (@delmembers) {
            logmsg("DEL MEMBER: $del");
        }

Results:
[2009-06-23 15:05:05] main(): Adds: 1
[2009-06-23 15:05:05] main(): Dels: 1
[2009-06-23 15:05:05] main(): ADD MEMBER: ARRAY(0x90db898)
[2009-06-23 15:05:05] main(): DEL MEMBER: ARRAY(0x9107658)

>From the docs I was assuming the return was an array of diff's.