my ($last_name, $first_name, undef, $home_phone, %fields) = split(/\s+/, $line);