chomp; (my $k, my @v) = /(\S*\s*\S*\s*)(\S*\s*\S*\s*)/; push @{$h{$k}} , shift @v;