push @{ $res{$_->[2]} }, $_ for @arr;