my @no_dups = do { my %h; grep !$h{ $_ }++, @list1, @list2 };