perl: remove elements of array2 from array1

Hi, I'm learning perl programming and would appreciate some help. How do I write code to remove elements of array2 from array1

I.e.

@array1={'a','b','c','d'}
@array2={''a','z','c','x'}


(magic happens, processes @array1 and @array2)

dump @array1 gives 'b','d'

Any clues?

Thanks!

>>10
Depends on how you implement sets. I'm no computer scientist, but it seems to me that you could get it in O(n) if you used sorted lists for your set implementation.