For readibility & ease-of-use I like Set::Array. It has a wealth of set operation, including the one you're looking for:

use Set::Array;
...
my $set_a = Set::Array->new(@a);
my $set_b = Set::Array->new(@b);
my @c = $set_a->difference(@set_b);
[download]