while(<FILE>) {
    my($key, $data) = /^(\S+).*\s(\S+)$/;
    $hash{$key} = $data;
}