perl: compare two arrays

Hi friends,

I want to compare two arrays and find matched one using perl?
Also, I want to delete unmatched one.

Plz suggest me solution

That thread should help see Durden Tyler's post.