...

} else {
    $temp = $temp->[NEXT];
    $pred = $pred->[NEXT]; # this is what you are saying.
}

...