'extracted name' => 'original_line',

##</code><code>##

my %seen;
my @result;
for my $el (@list1, @list2) {
    my $name= find_name_from_element($element);
    next if $seen{ $name }++;
    push @result, $el;
};

# Now @result has the unique elements