Select Code to Download

use strict;
use warnings;
...
if ($family_name{$name}) {
    print "$name is already there, and its family name is $family_name
+{$name} ";
}