my $d = [[],[], [], []];