chomp ($line = <$chld_out>); # Actual stats.
print $line, "\n";
-my ($white, $draw, $black, $opening_num, $white_avg_elo, $black_avg_elo, $num_elo, $timestamp, $pgn_file_number, $pgn_start_position, @moves) = split / /, $line;
+my ($white, $draw, $black, $computer, $opening_num, $white_avg_elo, $black_avg_elo, $num_elo, $timestamp, $pgn_file_number, $pgn_start_position, @moves) = split / /, $line;
# Explore one move out.
for my $move (@moves) {