my ($first, $second, $third) = split ' ', $line;