if(grep { check_coord($xCur, $yCur, $wall, $_) } 2..8) {