my( $first, $second, $third, $fourth, $fifth, $sixth ) = ( $line =~ m/\S+/g )[ 0, grep { $_ % 2 == 1 } 1 .. 9 ];