my @tmp = split('-',$current_board[$x]);
$current_board[$x] = \@tmp;