- my $king_col = _find_piece_col($board->[7], 'K');
- if ($rook_col < $king_col) {
- $pos->{'white_castle_q'} = _col_num_to_letter($rook_col);
+ my $king_col = _col_num_to_letter(_find_piece_col($board->[7], 'K'));
+ if ($rook_col lt $king_col) {
+ $pos->{'white_castle_q'} = $rook_col;