(my $id, $first{$name}, $second{$name}) = split /,/;