my %hash;
push @{ hash{ defined($_->[1]) ? $_->[1] : 0 } }, $_->[0] for @array;