$line =~ s/([^ ]+) //;
my $part = $1;