Although not as nicely readable as Riales's solution, here's another option:

map{$setB{$_}++}@listB;
@listC = grep{!$setB{$_}}@listA;
[download]

Hope this helps!